Гость
Целевая тема:
Создать новую тему:
Автор:
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / Передача параметра в VBA-макрос при вызове / 5 сообщений из 5, страница 1 из 1
03.04.2007, 17:23
    #34435079
debet
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Передача параметра в VBA-макрос при вызове
Пытаюсь при вызове 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
03.04.2007, 18:08
    #34435218
HOME_X
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Передача параметра в VBA-макрос при вызове
Так разве возможно ?
Это событие объекта и процедура строго структурирована !
И даже необязательный параметр не передаш !

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

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


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