Text - Writer

Wie kann man die Schrift einer Zelle senkrecht stellen?

Dies geht mit dem Cursor der Zelle. Diesen muss man aufrufen und hat dann die Eigenschaft CharRotation.

Um die erste Zeile einer Tabelle senkrecht zu stellen geht man folgenderweise vor:

   myDoc = thisComponent
   myTables = myDoc.getTextTables
   myTable = createunoservice("com.sun.star.text.TextTable")
   myTable=myTables.getByIndex(0)
   myCell = myTable.getCellByPosition(0,0)
   oCurs = myTable.createCursorByCellName("A1")
   oCurs.CharRotation=900
   oCurs = myTable.createCursorByCellName("B1")
   oCurs.CharRotation=900
   oCurs = myTable.createCursorByCellName("C1")
   oCurs.CharRotation=900

Mit der Wert 2700 statt 900 dreht sich der Text noch mal um die Achse.