Zellen(bereiche) formatieren
Verfasst: Mo, 31.01.2005 10:51
Über die Suchfunktion in diesem Forum bin ich an den folgenden Code gekommen:
Sub ZellAttribute_Bereich
oDoc = StarDesktop.CurrentComponent
oBereich = oDoc.getCurrentSelection().getRangeAddress()
msgbox "Spalte AB: " +oBereich.StartColumn
With ThisComponent.CurrentSelection
.CellBackColor = RGB(255,0,0)
End With
End Sub
Der hat bei mir aber nicht funktioniert. Ich bekomme eine "Syntax-Fehlermeldung" in der drittletzten Zeile.
Mein Problem ist, ich möchte einen Zellbereich formatieren. Hintergrundfarbe und Rahmen setzen.
Wer kann helfen?
Danke.
Sub ZellAttribute_Bereich
oDoc = StarDesktop.CurrentComponent
oBereich = oDoc.getCurrentSelection().getRangeAddress()
msgbox "Spalte AB: " +oBereich.StartColumn
With ThisComponent.CurrentSelection
.CellBackColor = RGB(255,0,0)
End With
End Sub
Der hat bei mir aber nicht funktioniert. Ich bekomme eine "Syntax-Fehlermeldung" in der drittletzten Zeile.
Mein Problem ist, ich möchte einen Zellbereich formatieren. Hintergrundfarbe und Rahmen setzen.
Wer kann helfen?
Danke.