Seite 1 von 1
Re: OOo Basic / Makro: Inhalt der markierten Zelle kopieren
Verfasst: Do, 23.02.2012 17:34
von Stephan
Du brauchst nur die Zeilen:
Code: Alles auswählen
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())
in der Aufzeichnung zu löschen.
(Hinweis: args3 kann bei Dir evtl. auch anders heißen z.B. args4)
Gruß
Stephan
Re: OOo Basic / Makro: Inhalt der markierten Zelle kopieren
Verfasst: Fr, 24.02.2012 14:40
von Stephan
vielleicht entdeckt ja jemand den "fehler".
Naja, der Dir gegebene Ratschlag ist ganz einfach falsch gewesen.
In der Zeile:
wird der 'Name' einer Zelle erwartet, die Zeile:
ü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:
(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
einfachen Wege "$B$8" bekomme, denn "B8" funktioniert an der Stelle wohl nicht.
Gruß
Stephan
Re: OOo Basic / Makro: Inhalt der markierten Zelle kopieren
Verfasst: Fr, 24.02.2012 15:08
von Karolus
Hallo
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.
Code: Alles auswählen
a_abs_name = split ( thiscomponent.currentSelection.AbsoluteName , ".")
cellname = a_abs_name( ubound( a_abs_name ))
Karo
Re: OOo Basic / Makro: Inhalt der markierten Zelle kopieren
Verfasst: Fr, 24.02.2012 15:10
von Stephan
doch, nach dem entfernen der an- und abführung ist alles OK
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
Re: OOo Basic / Makro: Inhalt der markierten Zelle kopieren
Verfasst: Fr, 24.02.2012 15:17
von Stephan
Karolus hat geschrieben:Hallo
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.
Code: Alles auswählen
a_abs_name = split ( thiscomponent.currentSelection.AbsoluteName , ".")
cellname = a_abs_name( ubound( a_abs_name ))
Karo
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