Makro um Tabellenzeilen zusammenzuhalten

[NWinkler]

Ich habe mir folgendes Makro aufgezeichnet, um bei den vielen Tabellen die ich in mehreren Tabellen habe, zu verhindern, dass die Tabellenzeilen (in denen mehrzeiliger Text steht getrennt werden:

Code: Alles auswählen

sub Test1
dim document as object
dim dispatcher as object
  document = ThisComponent.CurrentController.Frame
  dispatcher = createUnoService("com.sun.star.frame.DispatchHelper")
  dim args1(0) as new com.sun.star.beans.PropertyValue
  args1(0).Name = "RowSplit"
  args1(0).Value = false
  dispatcher.executeDispatch(document, ".uno:RowSplit", "", 0, args1())
end sub

So müssen die Tabelleneigenschaften sein - kein Haken bei "Zeilenumbruch"

so soll es sein

Tabellenformat_2013-09-06_15-59-15.jpg (17.64 KiB) 1989 mal betrachtet

Es funktioniert jedoch nicht.
Der Haken ist nicht weg, sondern grau:

und so ist es

Tabellenformat_2013-09-06_16-17-16.jpg (19.68 KiB) 1989 mal betrachtet

Version: 4.1.1.2
Build ID: 7e4286b58adc75a14f6d83f53a03b6c11fa2903

[lorbass]

Fragen zur Programmierung gehören nach LibreOffice Programmierung.

Gruß
lorbass