https://bugs.documentfoundation.org/show_bug.cgi?id=129655
--- Comment #3 from Mark Hung <[email protected]> ---
Note that the following code also does not work.
Sub Main
Dim oDrawPage As Variant
Dim oObj1 As Variant
Dim oObj2 As Variant
Dim oObj3 As Variant
Dim oObj4 As Variant
Dim nTextWritingMode As Long
oDrawPage = ThisComponent.getDrawPage()
oObj1 = oDrawPage.getByIndex(0)
oObj1.WritingMode = 2
msgbox "WritingMode:" & oObj1.WritingMode
oObj2 = oDrawPage.getByIndex(1)
oObj2.WritingMode = 2
msgbox "WritingMode:" & oObj2.WritingMode
End Sub
--
You are receiving this mail because:
You are the assignee for the bug._______________________________________________
Libreoffice-bugs mailing list
[email protected]
https://lists.freedesktop.org/mailman/listinfo/libreoffice-bugs
