Форум вопросов и ответов

Форум вопросов и ответов (https://www.otvetnemail.ru/)
-   Архив вопросов и ответов (https://www.otvetnemail.ru/arhiv-voprosov-i-otvetov-805/)
-   -   Как получить источник события запустившего макрос? (https://www.otvetnemail.ru/arhiv-voprosov-i-otvetov-805/kak-poluchit-istochnik-sobytiya-zapustivshego-makros-306112/)

Guest 29.09.2011 23:29

Как получить источник события запустившего макрос?
 
Я назначаю макрос (не создавая Listener) событию? например так:Код: Dim oGEB As Object Dim pEventProp(1) As New com.sun.star.beans.PropertyValue oGEB = CreateUnoService("com.sun.star.frame.Glo balEventBroadcaster") cEvents = oGEB.Events pEventProp(0).Handle = 0 pEventProp(0).Name = "EventType" pEventProp(0).State = 0 pEventProp(0).Value = "Script" pEventProp(1).Handle = 0 pEventProp(1).Name = "Script" pEventProp(1).State = 0 pEventProp(1).Value = "vnd.sun.star.script:OceanOfficeGuard.Ev entControl.OnLoad_Detect?language=Basic& location=application" cEvents.replaceByName("OnLoad",pEventPro p)Как теперь в процедуре OnLoad_Detect узнать какой документ источник события?


Часовой пояс GMT, время: 04:08.


© www.otvetnemail.ru - Форум вопросов и ответов.