Eine Formel in mehrere Zellen einfügen über Makro

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: Eine Formel in mehrere Zellen einfügen über Makro

Re: Eine Formel in mehrere Zellen einfügen über Makro

von Karolus » Do, 05.03.2015 19:09

Hallo

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

Karolus

Re: Eine Formel in mehrere Zellen einfügen über Makro

von LidiaS » Do, 05.03.2015 18:57

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

Re: Eine Formel in mehrere Zellen einfügen über Makro

von Karolus » Do, 05.03.2015 18:49

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.

Eine Formel in mehrere Zellen einfügen über Makro

von LidiaS » Do, 05.03.2015 18:28

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 :lol: ).

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

Lieben Dank und viele Grüße
Lidia

Nach oben