Re: [de-users] Frame eines Calc-Files wieder aktivieren

Hallo Wolfgang,

ich kann mir nicht vorstellen, dass jemand mit deinen Angaben viel 
anfangen kann. Das eigentliche Makro, das das Kopieren erledigt, ist ja 
gar nicht beurteilbar. Wird denn darin das ergänzte File gespeichert? 
Wenn nicht, dann ist völlig klar, dass das Laden in openFrame den alten 
Stand liefert.

Gerhard

Am 16.02.2017 um 11:55 schrieb Wolfgang Schaible:
> 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+unsubscribe@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