Я назначаю макрос (не создавая 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 узнать какой документ источник события?
| 
Линейный вид
