[openCalc Macro] gotoCell

[MrSpock]

Hallo,

in einem OpenCalc Macro habe ich mir die aktuelle Position gemerkt:

Code:

oCell = ThisComponent.getCurrentSelection

An einer anderen Stelle möchte ich jetzt wieder an diese Stelle springen:

Code:

dim args4(0) as new com.sun.star.beans.PropertyValue
args4(0).Name = "ToPoint"
args4(0).Value = oCell

dispatcher.executeDispatch(document, ".uno:GoToCell", "", 0, args4())

funktioniert nicht, weil oCell offensichtlich nicht als "String" interpretiert wird, der wohl als "Value" erwartet wird.

Wie springe ich also an die oCell Position?

[MrSpock]

Hallo,

hab jetzt eine Lösung zusammengebaut:

Merke mir die CellAddress

Code:

oCell = ThisComponent.getCurrentSelection.CellAddress

und frickel mir dann die Adresse zusammen:

Code:

rem ----------------------------------------------------------------------
dim args4(0) as new com.sun.star.beans.PropertyValue
args4(0).Name = "ToPoint"
args4(0).Value = "$"+Trim(Chr$(Asc("A")+oCell.Column))+"$"+Trim(Str(oCell.Row+1))

Vielleicht gibt es eine elegantere Möglichkeit, aber es funktioniert so.