запуск макроса excel из другой книги

У меня есть макрос, который находится на сервере. Мне нужно иметь возможность запускать его с разных рабочих станций, которые подключаются к этому серверу.

В настоящее время я делаю:

Application.Run ("L:\database\lcmsmacro\macro1.xlsm!macro_name") 

Сообщение об ошибке, которое я получаю, это «Макрос может быть недоступен в этой книге № 1004»

Я уже убедился, что мои настройки безопасности установлены на самом низком уровне.

Как запустить макрос из другой книги, размещенной на другом сервере?

с помощью надстроек мне помочь?

Я думаю, что в вашем синтаксисе отсутствуют одиночные кавычки:

 Application.Run ("'L:\database\lcmsmacro\macro1.xlsm'!macro_name") 

Затем, если вам нужно передать параметры, синтаксис будет следующим:

 Application.Run ("'L:\database\lcmsmacro\macro1.xlsm'!macro_name","param1","param2") 

Эта ошибка также появляется при наличии дубликатов имен макросов в удаленной книге, например, два макроса с именем «macro_name». Взял меня, чтобы узнать!

Как правило, в Именах требуется один сингл, если у вас есть пробел или пунктуация в имени, чтобы Excel не путался, думая, что пространство является преднамеренным разделением, например, разделяя аргументы метода. В некоторых случаях Excel будет настаивать на них. Обычно они не вредят их включению, даже если они не нужны, например, если в именах нет пробелов. Иногда Excel извлекает их, если они не нужны. http://www.eileenslounge.com/viewtopic.php?f=27&t=25599

Если макросу нужно найти относительный путь макроса, используя путь к книге, из которого вы запускаете макрос, и вам нужно запустить несколько макросов из списка массивов, приведенный ниже код поможет:

 Dim relativePath As String, programFileName As String Dim selectedProgramsFiles() As String, programsArrayLastIndex As Byte, I As Byte For I = 0 To programsArrayLastIndex 'Loop through all selected programs programFileName = selectedProgramsFiles(I) relativePath = ThisWorkbook.Path & "\" & programFileName Workbooks.Open Filename:=relativePath Application.Run ("'" & relativePath & "'!ModuleName.Main") Workbooks(programFileName).Activate ActiveWorkbook.Close SaveChanges:=False Next I 'For I = 0 To programsArrayLastIndex 'Loop through all selected program 
  • Функция для преобразования номера столбца в букву?
  • Удаление строки в Excel VBA
  • Показать данные фильтра столбца Excel в ячейках
  • Если строка содержит слово из списка, возвращаемое значение смежно со значением списка
  • Загрузка добавлений при программном программировании Excel
  • Ошибка времени выполнения 1004 Excel 2013
  • Excel - автоматически импортировать данные из ячейки при создании новой вкладки
  • Процедура слишком большая
  • Экземпляр Excel VBA.
  • Заполнение уникальных значений в массиве VBA из Excel
  • Объединение данных ячейки в другие данные, если значения соответствуют
  • Interesting Posts

    Какое изображение диска следует использовать с VirtualBox, VDI, VMDK, VHD или HDD?

    Почему C ++ не позволяет базовым classам реализовывать унаследованный интерфейс производного classа?

    Как ограничить тип файла в элементе управления FileUpload

    Как я могу разделить два файла XML?

    Объяснение Apache ZooKeeper

    Включить ведение журнала файлов для log4net из кода, а не из конфигурации

    Рекомендации для инструмента анализа кучи для Java?

    Набор данных большой сущности Entity, исключение из памяти

    Почему я не могу получить доступ к своему собственному веб-серверу из своей локальной сети?

    наследовать стиль от стиля по умолчанию

    Удаление столбцов из фрейма данных, где ВСЕ значения NA

    Разделить объекты NSData на другие объекты NSData заданного размера

    Установить страницу по умолчанию для ViewPager в Android

    UNREGISTERED_ON_API_CONSOLE при получении токена OAuth2 на Android

    Мои браузеры не будут использовать мое полное разрешение экрана, а также использовать разные разрешения между ними

    Давайте будем гением компьютера.