Eine Formel in mehrere Zellen einfügen über Makro

[LidiaS]

Hallo Allerseits,

leider komme ich hier einfach nicht weiter. Ich habe rumprobiert, gelesen, verstanden oder auch nicht, aber ich bekomme es nicht hin.

Warum geht das hier:

Code: Alles auswählen

   myDocument = ThisComponent
   mySheet = myDocument.Sheets.getByIndex(0)
   Cell=mySheet.getCellRangeByName("O1") 
   Cell.Formula = "=CONCATENATE(M1;" & """ """ & ";N1)"
   

und das hier nicht:

Code: Alles auswählen

   myDocument = ThisComponent
   mySheet = myDocument.Sheets.getByIndex(0)
   Cell=mySheet.getCellRangeByName("O1:O10") 
   Cell.Formula = "=CONCATENATE(M1;" & """ """ & ";N1)"
   

???

Warum wird die Formel nicht in die Zellen O1 bis O10 eingefügt?

Ich weiß, dass ich das mit einer Direkteingabe der Formel im Tabellenblatt lösen kann, nur möchte ich diese kleine Aufgabe in einen größeren Makro, der ein Tabellenblatt umformatiert, Daten löscht, Spalten einfügt, und dann weitere Dokumente zwecks Bearbeitung öffnet, einfügen (läuft schon alles ).

Ich wäre Euch sehr dankbar, wenn Ihr mir hier auf die Sprünge helfen könntet.

Lieben Dank und viele Grüße
Lidia

[Karolus]

Hallo

mit rumprobieren alleine ist es nicht getan, ein Zellbereich hat kein Attribut ``Formula``[1]



Vermutlich möchtest du auch nicht zehn mal die gleiche Formel da stehen haben sondern relativ angepasst:

Code: Alles auswählen

   myDocument = ThisComponent
   mySheet = myDocument.Sheets.getByIndex(0)
   Cell=mySheet.getCellRangeByName("O1")
   Cell.Formula = "=CONCATENATE(M1;"" "";N1)"
   Cellrange = mySheet.getCellRangeByName("O1:O10")
   Cellrange.fillAuto(0,1)

[1]Was du mit einem vernünftigen Objectinspector leicht selbst herausfinden kannst.

[LidiaS]

Hallo Karolus,

ganz herzlichen Dank für die Turbo-Hilfe. Es funktioniert und ich bin total happy! Den Objectinspector werde ich mir auf jeden Fall ansehen. Auch hier vielen Dank für den Tipp.

Viele Grüße und einen schönen Abend
Lidia

[Karolus]

Hallo

Schau noch mal in die letzte Antwort, ich hab da noch ein paar " und & geklaut, die da nicht gebraucht werden.

Karolus