LibreOffice-Forum

Hallo zusammen,

LO 7.4.3.2 (x64)
mit nachfolgendem Code kann ich in einer neuen Arbeitsmappe einen rechteckigen geschlossenen Rahmen erstellen. In der angefügten Arbeitsmappe erstellt der gleiche Code nur oben und unten eine Linie.

Code: Alles auswählen

Sub Umrandung
Dim BasicBorder as New com.sun.star.table.BorderLine
Dim oBorder As Object
oSheet=ThisComponent.Sheets.getByName("Tabelle1")
BasicBorder.Color = RGB(0, 0, 0)
BasicBorder.InnerLineWidth = 0
BasicBorder.OuterLineWidth = 60
BasicBorder.LineDistance = 0
oBorder = oSheet.getCellRangeByPosition(3, 1, 5, 34).TableBorder
oBorder.LeftLine = BasicBorder
oBorder.TopLine = BasicBorder
oBorder.RightLine = BasicBorder
oBorder.BottomLine = BasicBorder
oSheet.getCellRangeByPosition(3, 1, 5, 34).TableBorder = oBorder
End Sub

Umrandung.ods: (12.88 KiB) 101-mal heruntergeladen

Was könnt die Ursache sein?

Viele Grüße
Ich Bins

Hallo,
es müssen auch folgende Eigenschaften gesetzt werden:

Code: Alles auswählen

oBorder.IsLeftLineValid=True
oBorder.IsRightLineValid=True
oBorder.IsTopLineValid=True
oBorder.IsBottomLineValid=True

Hallo mikele,
das war die Lösung, vielen Dank!
Viele Grüße
Ich Bins

LibreOffice-Forum

[GELÖST] Umrandung nur oben und unten

[GELÖST] Umrandung nur oben und unten

Re: Umrandung nur oben und unten

Re: Umrandung nur oben und unten