Zellen anwählen in unterschiedlichen Spalten

Antwort erstellen

BBCode ist eingeschaltet
[img] ist ausgeschaltet
[url] ist eingeschaltet
Smileys sind ausgeschaltet
Die letzten Beiträge des Themas
   

Ansicht erweitern Die letzten Beiträge des Themas: Zellen anwählen in unterschiedlichen Spalten

Re: Zellen anwählen in unterschiedlichen Spalten

von cruzylin » Do, 10.02.2011 20:13

Danke für die Hinweise an den Zeilen, jetzt konnte ich es mir so basteln, wie ich es haben wollte.

Danke Danke !!!

Zellen anwählen in unterschiedlichen Spalten

von cruzylin » Mi, 09.02.2011 22:27

Hallo,
ich habe mit Hilfe des Makroaufzeichnens es geschafft, über Buttons die Nachkommastellen für mehrere Zellen in einer Spalte zu setzen.
Nur würde ich gerne auch mehrere Zellen in anderen spalten ebenfalls so beeinflussen, ich bekomme es nicht ganz hin.
Hier mal der Code:

Code: Alles auswählen

sub NachKomma0
rem ----------------------------------------------------------------------
rem define variables
dim document   as object
dim dispatcher as object
rem ----------------------------------------------------------------------
rem get access to the document
document   = ThisComponent.CurrentController.Frame
dispatcher = createUnoService("com.sun.star.frame.DispatchHelper")

rem ----------------------------------------------------------------------
dim args1(0) as new com.sun.star.beans.PropertyValue
args1(0).Name = "ToPoint"
args1(0).Value = "$L$15:$L$18"

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

rem ----------------------------------------------------------------------
dim args2(0) as new com.sun.star.beans.PropertyValue
args2(0).Name = "NumberFormatValue"
args2(0).Value = 1

dispatcher.executeDispatch(document, ".uno:NumberFormatValue", "", 0, args2())
Mit dieser Syntax bekomme ich das ja ganz gut hin, doch wie muss diese aussehen, wenn ich z.Bsp. in Zelle F25 dieses Format ebenfalls umsetzen möchte ???

Nach oben