Seite 1 von 1
OO3 Button für Gitterlinien ausblenden
Verfasst: Mo, 20.10.2008 20:13
von 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
Re: OO3 Button für Gitterlinien ausblenden
Verfasst: Mo, 20.10.2008 20:25
von 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!
Re: OO3 Button für Gitterlinien ausblenden
Verfasst: Mo, 20.10.2008 20:43
von 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
Gruß Karo
Re: OO3 Button für Gitterlinien ausblenden
Verfasst: Di, 21.10.2008 18:16
von Chriz
Danke, das mit dem Makro hat funktioniert.
Ist aber komisch, dass es diesen Button nicht standardmäßig gibt.
Thanx Chriz