| Author |
 Topic  |
|
|
Sergei
8 Posts |
 Posted - 06/20/2004 : 18:09:47
|
Допустим я управляю Visio из другой программы (например Microsoft Access) как будет выглядеть командная строка в VBA для того чтобы
запустить в существующем открытом файле Visio ранее сохраненный
в нем Макрос ?
Спасибо. |
|
|
Tumanov
Russia
1198 Posts |
Posted - 06/20/2004 : 20:54:07
|
Макрос в Visio
Sub РанееСохраненныйМакрос()
MsgBox "Привет!"
End Sub
Макрос в Excel
Sub ttt()
Set appVisio = GetObject(, "Visio.Application")
appVisio.ActiveDocument.ExecuteLine ("ThisDocument.РанееСохраненныйМакрос")
End Sub
Только не забыть MsgBox закрыть, а то он в окне Visio выскакивает :) |
 |
|
|
Sergei
8 Posts |
Posted - 06/21/2004 : 08:04:06
|
спасибо это сработало а как в Exel перейти на другую страницу
ActiveWindow.Page = "Page-1" там не работает ? |
|
|
|
Tumanov
Russia
1198 Posts |
Posted - 06/21/2004 : 16:00:50
|
| Worksheets("Лист2").Activate |
|
|
| |
Topic |
|
All Forums
Макрос Visio