Texttabelle Zellen verbinden

Programmierung unter AOO/LO (StarBasic, Python, Java, ...)

Moderator: Moderatoren

LokutusvB
***
Beiträge: 77
Registriert: Di, 03.11.2009 09:52

Texttabelle Zellen verbinden

Beitrag von LokutusvB »

Hallo,

ich habe noch eine kleine Ungereimtheit beim Verbinden 2er Zellen in einer Texttabelle eines sWriter-Dokumentes. Nach längerer zeit habe ich es endlich hinbekommen, das sich 2 Zellen verbinden lassen. Allerdings bekomme ich es nur hin, wenn ich den tableCursor über den Namen setzte, mit der Range wäre mir es lieber. Ich habe schon alles mögliche versucht, aber es will mir nicht gelingen, den TableCursor über die Range zu setzen. Xray ist mir leider keine große Hilfe, damit komme ich nur sehr schlecht zurecht :(.

Hier mal mein Quelltext (Delphi):

Code: Alles auswählen

procedure OOMerge(tableIndex, xpos, ypos);
var
  tables, aktTable, cursor, range: Variant;
begin
  tables := Document.getTexttables;
  aktTable := tables.getByIndex(tableIndex);
  //range := aktTable.getCellRangeByPosition(xpos, ypos, xpos, ypos);
  //cursor := aktTable.createCursorByCellRange(range); //Fehlermeldung
  cursor := aktTable.createCursorByCellName('A1');
  cursor.goDown(1, True);
  cursor.mergeRange; 
end;
Gibt es eine Möglichkeit, den Cursor auch über die Range zu setzen?