https://bugs.freedesktop.org/show_bug.cgi?id=42784
Bug #: 42784
Summary: BorderLine do not work
Classification: Unclassified
Product: LibreOffice
Version: LibO 3.4.4 release
Platform: x86 (IA32)
OS/Version: Windows (All)
Status: UNCONFIRMED
Severity: major
Priority: high
Component: BASIC
AssignedTo: [email protected]
ReportedBy: [email protected]
CC: [email protected]
Depends on: 33397
+++ This bug was initially created as a clone of Bug #33397 +++
BorderLine do not work using LibreOffice 3.4.4 api (and it works using
OpenOffice.org 3.3.0 api)
Sub upRahmenUnten(nAPosSP, nAPosZ, nEPosSP, nEPosZ As Long)
'Rand unten einfügen, Übergabevariablen: AnfangsPosSpalte, AnfangsPosZeile,
EndPosSpalte, EndPosZeile
Dim oRahmenEinfach as New com.sun.star.table.BorderLine
With oRahmenEinfach
.Color = rgb(0, 0, 0)
.InnerLineWidth = 2
.OuterLineWidth = 0
.LineDistance = 0
End With
oBenutzterBereich =
oSheet.getCellRangeByPosition(nAPosSP,nAPosZ,nEPosSP,nEPosZ).TableBorder
oBenutzterBereich.BottomLine = oRahmenEinfach
oSheet.getCellRangeByPosition(nAPosSP,nAPosZ,nEPosSP,nEPosZ).TableBorder =
oBenutzterBereich
End Sub
--
Configure bugmail: https://bugs.freedesktop.org/userprefs.cgi?tab=email
------- You are receiving this mail because: -------
You are the assignee for the bug.
_______________________________________________
Libreoffice-bugs mailing list
[email protected]
http://lists.freedesktop.org/mailman/listinfo/libreoffice-bugs
