powered by simpleCommunicator - 2.0.61     © 2026 Programmizd 02
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / Передача параметра в VBA-макрос при вызове
5 сообщений из 5, страница 1 из 1
Передача параметра в VBA-макрос при вызове
    #34435079
debet
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Пытаюсь при вызове DOC-файла с VBA-макросом передать параметр. "В лоб" не выходит:
вызов:
--------------------
>winword doc1.doc tratata
--------------------
Макрос:
-------------------
Private Sub Document_Open(prm As String)
MsgBox prm
End Sub
--------------------
Сообщение:
--------------------
Procedure declaration does not match description of event or procedure hanig the same name
--------------------
Если убрать параметр, прокатывает:
----------------------
Private Sub Document_Open()
MsgBox "tratata"
End Sub
-----------------------
...
Рейтинг: 0 / 0
Передача параметра в VBA-макрос при вызове
    #34435218
HOME_X
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Так разве возможно ?
Это событие объекта и процедура строго структурирована !
И даже необязательный параметр не передаш !

Private Sub CommandButton1_Click(Optional S As String="Hello")
MsgBox S
End Sub
...
Рейтинг: 0 / 0
Передача параметра в VBA-макрос при вызове
    #34435231
debet
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Спасибо!
...
Рейтинг: 0 / 0
Передача параметра в VBA-макрос при вызове
    #34435659
Фотография Antonariy
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Как вариант: при создании Word.Application присваивать свойствам UserAddress, UserInitials или UserName какое-нибудь значение, а при открытии считывать макросом.
...
Рейтинг: 0 / 0
Передача параметра в VBA-макрос при вызове
    #34436874
HOME_X
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Есть еще вариант с функцией Command
(она снимает параметры коммандной строки)
Но в случае Office кажеться не работает

Private Sub Command1_Click()
MsgBox Command()
End Sub
...
Рейтинг: 0 / 0
5 сообщений из 5, страница 1 из 1
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / Передача параметра в VBA-макрос при вызове
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]