Hallo,

unter "LO 5.3.3.2 (x64) @ Windows 7 Home Premium (x64)" scheinen die "uno"-Kommandos "uno:ColumnWidth" und "uno:RowHeight" nicht mehr korrekt zu funktionieren. Anstatt dass die im Makro übergebene ColumnWidth bzw. RowHeigth angewendet wird erscheint jeweils ein PopUp-Menü. Unter "LO 5.2.7.2 (x64) @ Windows 7 Home Premium (x64)" tritt diese Fehlfunktion nicht auf.

Die Frage ist nun, hat sich mit der neuen LO-Version die Syntax für die beiden "uno"-Kommandos geändert oder liegt ein BUG vor.

Weiter unten zum Nachvollziehen ein Basic Makro mit den beiden "uno"-Kommandos und Ablaufbeschreibungen für "LO 5.2.7.2 (x64)" bzw. "LO 5.3.3.2 (x64)".

Gruß
Hans-Werner

1   "LibreOffice Basic"-Makro

Sub TestUnoCommand

Dim oC as Object : oC = ThisComponent.CurrentController
Dim oF as Object : oF = oC.Frame
Dim oS as Object : oS = oC.ActiveSheet
Dim oD as Object : oD = createUnoService("com.sun.star.frame.DispatchHelper")

Dim Column as Integer
Dim Row as Integer
Dim RowHeight as Long
Dim ColumnWidth as Long

Dim VP(0) as New com.sun.star.beans.PropertyValue

Column = 0
Row = 0
RowHeight = 20

oC.Select(oS.getCellByPosition(Column,Row))

VP(0).Name = "RowHeight"
VP(0).Value = RowHeight * 100

oD.executeDispatch(oF,".uno:RowHeight","",0,VP())

Column = 1
Row = 1
ColumnWidth = 40

oC.Select(oS.getCellByPosition(Column,Row))

VP(0).Name = "ColumnWidth"
VP(0).Value = ColumnWidth * 100

oD.executeDispatch(oF,".uno:ColumnWidth","",0,VP())

End Sub

2 Ablauf unter "LibreOffice 5.2.7.2 (x64) @ Windows 7 Home Premium (x64)"

2.1   Neue, leere Tabelle
2.2 Zeilenhöhe Zelle "A1" = 0,45 cm und Spaltenbreite Zelle "B2" = 2,26 cm
2.3   Ausführen "LibreOffice Basic"-Makro "TestUnoCommand"
2.4 Zeilenhöhe Zelle "A1" = 2,00 cm und Spaltenbreite Zelle "B2" = 4,00 cm 2.5 Die "uno"-Kommandos werden korrekt ausgeführt. Es wird kein PopUp-Menü angezeigt.

3 Ablauf unter "LibreOffice 5.3.3.2 (x64) @ Windows 7 Home Premium (x64)

3.1   Neue, leere Tabelle
3.2 Zeilenhöhe Zelle "A1" = 0,45 cm und Spaltenbreite Zelle "B2" = 2,26 cm
3.3   Ausführen "LibreOffice Basic"-Makro "TestUnoCommand"
3.4   Anzeige PopUp-Menü "Zeilenhöhe"
3.5   MausKlick auf [Abbrechen]
3.6   Anzeige PopUp-Menü "Spaltenbreite"
3.7   MausKlick auf [Abbrechen]
3.8 Zeilenhöhe Zelle "A1" = 0,45 cm und Spaltenbreite Zelle "B2" = 2,26 cm 3.9 Die "uno"-Kommandos werden NICHT korrekt ausgeführt. Stattdessen werden PopUp-Menüs angezeigt.



--
Liste abmelden mit E-Mail an: users+unsubscr...@de.libreoffice.org
Probleme? 
http://de.libreoffice.org/hilfe-kontakt/mailing-listen/abmeldung-liste/
Tipps zu Listenmails: http://wiki.documentfoundation.org/Netiquette/de
Listenarchiv: http://listarchives.libreoffice.org/de/users/
Alle E-Mails an diese Liste werden unlöschbar öffentlich archiviert

Antwort per Email an