Formatierung einer Zelle in Calc

[weinbach]

Hallo,

ich würde gerne den (unteren) Rand einer Zelle in Calc auf weiß oder schwarz setzen. Krieg aber den Code nicht hin.
Kann mir jemand helfen?

[mikele]

Hallo,

(unteren) Rand einer Zelle in Calc auf weiß oder schwarz setzen

das heißt?
Wie weit bist du mit deinem Code?

Vielleicht meinst du ja sowas:
http://www.dannenhoefer.de/faqstarbasic ... rahmentext

[weinbach]

Danke, aber das läuft in meinem LibreCalc auch nicht.
Ich hab's so probiert (nach Andrew Pitonyak):

oBorder = CreateUnoStruct("com.sun.star.table.BorderLinie")
oBorder.Color = RGB(0, 102, 199) 'z.B. blau
oBorder.OuterLineWidth = 35
oCell.BottomBorder = oBorder

[mikele]

Hallo,
kleiner Tippfehler

Code: Alles auswählen

oBorder = CreateUnoStruct("com.sun.star.table.BorderLine") 'nicht BorderLinie

Alternativ könntest du auch die ursprüngliche Linie lesen, ändern und wieder zurückschreiben:

Code: Alles auswählen

oBorder=ocell.Bottomborder
oBorder.Color = RGB(0, 102, 199) 'z.B. blau
oBorder.OuterLineWidth = 100
oCell.BottomBorder = oBorder

[weinbach]

Vielen Dank, das bringt mich jetzt endlich weiter!