BASIC Makro - 1. Zeile fixieren wenn CALC unsichtbar geöffnet

de-users
#1

Hallo,

gibt es eine Möglichkeit (innerhalb eines BASIC-Makros) in einer unsichtbar geöffneten CALC-Datei bei mehreren Arbeitsblättern jeweils die erste Zeile zu fixieren OHNE die CALC-Datei vorher sichtbar zu machen ?

Ich habe nur diese (funktionierende) Lösung mit "vorher sichtbar machen" gefunden:

:
' CALC unsichtbar laden ::::::::::::::::::::::::::::::::::::::::::::::::::::::::::
      Dim aPV(0) as New com.sun.star.beans.PropertyValue : aPV(0).name = "Hidden"
                                                           aPV(0).value = True
      oD = StarDesktop.loadComponentFromURL(ConvertToURL(SP),"_blank",0,aPV())

: Verarbeitung ...

' CALC sichtbar machen :::::::::::::::::::::::::::::::::::::::::::::::::::::::::::
      oD.getCurrentController().getFrame().getContainerWindow().setVisible(True)
      Wait(500)

' Fixierung erste Zeile aller Arbeitsblätter :::::::::::::::::::::::::::::::::::::
      For iA=3 To 0 Step -1
         oA = ThisComponent.Sheets(iA)
         ThisComponent.CurrentController.setActiveSheet(oA)
         ThisComponent.getCurrentController().FreezeAtPosition(0,1)
      Next iA
:

Danke im Voraus für eventuelle Tipps,
Grüße
Hans-Werner