Sehr geehrte Community 'MacOS Sierra 10.12.1 ; jre-8u111 ; LO 5.3.0.3

Ausgehend von einem Calc-Benutzerfile kopiere ich eine bestimmte Seite aus dem Musterfile ('Hidden' geöffnet und geschlossen). Aktives Frame ist danach 'Meine Makros & Dialoge.wsLib'. Wie kann ich das ursprüngliche, nun erweiterte File zur Weiterbehandlung im Makro aktivieren?


Die Sub 'openFrame' liefert eine 2. Fassung des Benutzerfiles ohne die sichtbare zusätzliche Seite. Was ist falsch an der Sub?

mit freundlichen Grüssen
Wolfgang

Sub openFrame
    Dim mArgs(1) As new com.sun.star.beans.PropertyValue
    mArgs(0).Name    = "MacroExecutionMode"    : mArgs(0).Value    = 4
    mArgs(1).Name    = "AsTemplate"             : mArgs(1).Value    = FALSE
'    mArgs(2).Name    = "ReadOnly"             : mArgs(2).Value    = True
sUrl = ConvertToUrl("/Users/wsAdm/Documents/me/Gesundh/18_GesundhDta.ods")
'1)    vFrame    = ThisComponent.getCurrentController().getFrame
'1) mault: Eigenschaft oder Methode nicht gefunden: getCurrentController
    vFrames = StarDesktop.GetFrames()
    For i=1 To vFrames.getCount()
        vFrame = vFrames.getByIndex(i-1)
        s = s & CStr(i-1) & " : " & vFrame.Title & CHR(10)
    If vFrame.Title = "18_GesundhDta.ods" Then Exit for
    Next i
'2)    oDoc    = vFrame.LoadComponentFromUrl(sUrl,vFrame,2,mArgs())
'2) ergänztes File verschwindet, 2. Fassung des Originals am Schirm
    wait 1000 '<======= 1s Verzögerung
    oDoc    = vFrame.LoadComponentFromUrl(sUrl,"",2,mArgs())
'3) 1s bleibt das ergänzte file, wird überschrieben vom Original
End Sub


--
Liste abmelden mit E-Mail an: users+unsubscr...@de.libreoffice.org
Probleme? 
http://de.libreoffice.org/hilfe-kontakt/mailing-listen/abmeldung-liste/
Tipps zu Listenmails: http://wiki.documentfoundation.org/Netiquette/de
Listenarchiv: http://listarchives.libreoffice.org/de/users/
Alle E-Mails an diese Liste werden unlöschbar öffentlich archiviert

Antwort per Email an