Ciao
io usando il registratore di macro riesco solo a bloccare i riquadri ma non ha inserirli
l'unica è farlo a mano
in excels sono chiamati
ActiveWindow.SplitRow = 1
ActiveWindow.FreezePanes = True
usando il registratore di macro questi termini li trovo (splitWindows e Freepanes)
dim document as object
dim dispatcher as object
rem ----------------------------------------------------------------------
rem get access to the document
document = ThisComponent.CurrentController.Frame
dispatcher = createUnoService("com.sun.star.frame.DispatchHelper")
rem ----------------------------------------------------------------------
dispatcher.executeDispatch(document, ".uno:SplitWindow", "", 0, Array())
dispatcher.executeDispatch(document, ".uno:FreezePanes", "", 0, Array())
EDIT:
questo fa al caso tuo
Dim Doc as object
Doc = stardesktop.currentcomponent
Doc.CurrentController.FreezeAtPosition(0,1)
funziona sul foglio corrente
Ciao