Blattschutz Symbol in Register Blattname ausblenden

Programmierung unter AOO/LO (StarBasic, Python, Java, ...)

Moderator: Moderatoren

Tadeus.
Beiträge: 6
Registriert: Do, 30.05.2019 10:44

Blattschutz Symbol in Register Blattname ausblenden

Beitrag von Tadeus. » Mo, 10.06.2019 15:00

Hallo,
Ich habe mit einem Makro-Looping den Blattschutz von allen Tabellenblättern aufgehoben.
Das Blattschutzsymbol in den Registerkarten ist allerdings weiterhin sichtbar.
Erst nach Speichern und Dokument öffnen ist das Symbol Blattschutz in Registerkarten weg.

Gibt es ein Makrokommando um die Register der Blätter zu aktualisieren?

Stephan
********
Beiträge: 11037
Registriert: Mi, 30.06.2004 19:36
Wohnort: nahe Berlin

Re: Blattschutz Symbol in Register Blattname ausblenden

Beitrag von Stephan » Mo, 10.06.2019 19:49

Das Blattschutzsymbol in den Registerkarten ist allerdings weiterhin sichtbar.
Dann musst Du zum Entfernen des Blattschutzes dispatcher-Code benutzen:

Code: Alles auswählen

document   = ThisComponent.CurrentController.Frame
dispatcher = createUnoService("com.sun.star.frame.DispatchHelper")
dim args1(0) as new com.sun.star.beans.PropertyValue
args1(0).Name = "Protect"
args1(0).Value = false
dispatcher.executeDispatch(document, ".uno:Protect", "", 0, args1())

oder nach Aufheben des Schutzes das entsprechende Tabellenblatt im Makro zusätzlich kurz aus- und wiedereinblenden.
Gibt es ein Makrokommando um die Register der Blätter zu aktualisieren?
mir ist Keines bekannt


Gruß
Stephan

Antworten