OpenOffice.info

v_cur = ThisComponent.getCurrentController().getViewCursor()
	If v_cur.Text.ImplementationName = "SwXCell" Then
		If v_cur.TextTable.Name = "Tabelle_1" Then
			aktuelle_zelle = v_cur.Cell.CellName
			tmp = LEN(aktuelle_zelle)
			aktuelle_zeile = VAL(Right(aktuelle_zelle, tmp-1))
		End If
	End If

[quote=mikeleb post_id=270444 time=1499797219 user_id=43151]
Hallo Stephan,
es scheint keine Adresse wie in Calc zu geben. Am einfachsten wäre es, den Text der Adresse zu zerlegen und daraus Zeile und Spalte zu bestimmen.
[/quote]

ja, sieht so aus.

Ich verwende jetzt zum Bestimmen der Zeile:

[code]v_cur = ThisComponent.getCurrentController().getViewCursor()
If v_cur.Text.ImplementationName = "SwXCell" Then
If v_cur.TextTable.Name = "Tabelle_1" Then
aktuelle_zelle = v_cur.Cell.CellName
tmp = LEN(aktuelle_zelle)
aktuelle_zeile = VAL(Right(aktuelle_zelle, tmp-1))
End If
End If
[/code]

Hinweise:
(a)
dieser Code geht vereinfachend davon aus das eine [b]Writer-Tabelle[/b] wohl kaum mehr als 26 Spalten (A-Z) haben wird. In Fällen wo doch mehr als 26 vorkommen können müsste der Code erweitert werden.
(b)
die bestimmte Zeile entspricht der Zeilennummer (erste Zeile =1)


Gruß
Stephan

Hallo Stephan,
es scheint keine Adresse wie in Calc zu geben. Am einfachsten wäre es, den Text der Adresse zu zerlegen und daraus Zeile und Spalte zu bestimmen.

oSels = ThisComponent.getCurrentSelection()
oSel = oSels.getByIndex(0)
oCell = oSel.Cell
Msgbox oCell.CellName

Hallo,

in einem [b]Writerdokument [/b]befindet sich der sichtbare Cursor in einer Zelle einer [b]Texttabelle[/b]. Den Namen dieser Zelle bekomme ich so:

[code]oSels = ThisComponent.getCurrentSelection()
oSel = oSels.getByIndex(0)
oCell = oSel.Cell
Msgbox oCell.CellName
[/code]
Wie aber bekomme ich Zeile und Spalte dieser Zelle?
Geht das nur indirekt, z.B. indem ich durch alle Zellen interiere bis ich die Zelle passenden Namens gefunden habe? (Ich finde kein RangeAddress-Object der Zelle.(?) Oder bin ich blind?)


Gruß
Stephan