OpenOffice.info

[quote="Karolus"]Hallo
[quote]Ich bin leider gerade zu bequem einen richtigen Code hinzuschreiben weil ich grade eine DEnkblockade habe wie ich auf einfachen Wege "$B$8" bekomme, denn "B8" funktioniert an der Stelle wohl nicht.[/quote]

[code]a_abs_name = split ( thiscomponent.currentSelection.AbsoluteName , ".")
cellname = a_abs_name( ubound( a_abs_name ))[/code]

Karo[/quote]

Ja, danke. Mir fiel .AbsoluteName nicht ein .

Ich habe die ganze Zeit mit .UserInterfaceRepresentation rumgemacht, basierend auf ThisComponent.CreateInstance(com.sun.star.table.celladdressConvertion)




Gruß
Stephan

[quote]doch, nach dem entfernen der an- und abführung ist alles OK[/quote]

wenn das so ist (habs nicht gegengeprüft) hab ich mich ziemlich blamiert denn ich habe ganz sicher angenommen das nur der Zellname aktzeptiert wird und sogar nur als absolute Angabe.


Gruß
Stephan

a_abs_name = split ( thiscomponent.currentSelection.AbsoluteName , ".")
cellname = a_abs_name( ubound( a_abs_name ))

Hallo
[quote]Ich bin leider gerade zu bequem einen richtigen Code hinzuschreiben weil ich grade eine DEnkblockade habe wie ich auf einfachen Wege "$B$8" bekomme, denn "B8" funktioniert an der Stelle wohl nicht.[/quote]

[code]a_abs_name = split ( thiscomponent.currentSelection.AbsoluteName , ".")
cellname = a_abs_name( ubound( a_abs_name ))[/code]

Karo

args1(0).Value = "$B$8"

args1(0).Value = "ThisComponent.GetCurrentSelection"

args1(0).Value = ThisComponent.GetCurrentSelection

[quote]vielleicht entdeckt ja jemand den "fehler".[/quote]

Naja, der Dir gegebene Ratschlag ist ganz einfach falsch gewesen.

In der Zeile:

[code]args1(0).Value = "$B$8"[/code]

wird der 'Name' einer Zelle erwartet, die Zeile:

[code]args1(0).Value = "ThisComponent.GetCurrentSelection"[/code]

übergibt jedoch das Zellobjekt der Zelle. Eigentlich nicht einmal das weil Du es noch falsch geschrieben hast denn im Sinne was dir geraten wurde müßte es heißen:

[code]args1(0).Value = ThisComponent.GetCurrentSelection[/code]

(funktionieren tut das natürlich auch nicht)


Ich bin leider gerade zu bequem einen richtigen Code hinzuschreiben weil ich grade eine DEnkblockade habe wie ich auf [u]einfachen[/u] Wege "$B$8" bekomme, denn "B8" funktioniert an der Stelle wohl nicht.



Gruß
Stephan

dim args3(0) as new com.sun.star.beans.PropertyValue
args3(0).Name = "ToPoint"
args3(0).Value = "$B$8"

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

Du brauchst nur die Zeilen:

[code]dim args3(0) as new com.sun.star.beans.PropertyValue
args3(0).Name = "ToPoint"
args3(0).Value = "$B$8"

dispatcher.executeDispatch(document, ".uno:GoToCell", "", 0, args3())[/code]

in der Aufzeichnung zu löschen.

(Hinweis: args3 kann bei Dir evtl. auch anders heißen z.B. args4)



Gruß
Stephan