OO3 Button für Gitterlinien ausblenden

[Chriz]

Gibt es in OO3 einen Button um die Gittelinien schnell mal ein und aus zu blenden?
Über Extras Optionen Ansicht dauert das im Unterricht zu lange.

Gruß

Chriz

[komma4]

Eine "fertige" Schaltfläche dafür kenne ich nicht.

Ich verwende ein Makro zum Umschalten der Gitternetz-Anzeige:

Code: Alles auswählen

Sub calc_toggleGridLines

' Kontroller
oCtrl = ThisComponent.getCurrentController()

' test
' Objekt? 
if IsMissing( oCtrl ) then
msgbox "kein Calc-Dokument?"
exit sub
end if

' get status
Dim bStatusGridLines as Boolean
bShowGridLines = oCtrl.getPropertyValue( "ShowGrid" )

' test
' Objekt?
if IsMissing( bShowGridLines ) then
msgbox "kein Calc-Dokument?"
exit sub
end if

' Status umschalten
' toggle status
' bool'sche Variable ist TRUE wenn sichtbar, umsetzen
if bShowGridLines then
oCtrl.setPropertyValue( "ShowGrid",FALSE )
else
' bool'sche Variable ist FALSE wenn sichtbar, umsetzen
oCtrl.setPropertyValue( "ShowGrid",TRUE )
end if
End Sub

Das habe ich einer Schaltfläche auf meiner benutzerdefinierten Symbolleiste für Calc-Dokumente hinterlegt.

Viel Spass!

[Karolus]

Hallo
Erstell dir schnell einen Button und verknüpf ihn mit folgendem Makro:

Code: Alles auswählen

Sub switch_Gitter 
ThisComponent.currentcontroller.ShowGrid = not ThisComponent.currentcontroller.ShowGrid
End Sub

Kapitel 'Quellcode übernehmen'
http://www.ooowiki.de/MakrosMitEinemKlick

Gruß Karo

[Chriz]

Danke, das mit dem Makro hat funktioniert.
Ist aber komisch, dass es diesen Button nicht standardmäßig gibt.

Thanx Chriz