Seite 1 von 1

Formel mit Makro bis ans Ende kopieren

Verfasst: Sa 6. Jan 2018, 15:48
von blackman
Hallo Profis,

eine wohl ganz einfache Frage. Wie kann ich mit einem Makro eine bestehende Formel nach unten bis zur letzten gefüllten Zelle in Calc kopieren?

Muss ich das wirklich mit einer For-Next Schleife machen und die Formel jeweils anpassen, oder gibt es da eine einfachere Möglichkeit? In Microsoft Office konnte ich das mit einem Befehl machen... die letzte Zeile hätte ich ermittelt, das ist nicht das Problem

In D2 ist eine Formel ( "=C2+1" als Beispiel) und die soll nach unten gefüllt werden, solange in C ein Wert steht (also in D3: =c3+1, D4: =c4+1, ...)
mit

Code: Alles auswählen

ocursor = oTabellenblatt.createcursor
ocursor.gotoendofusedarea(false)
orangeaddress = ocursor.rangeaddress
nEndrow = orangeaddress.EndRow
habe ich in nEndrow ja die letzte Zeile (falls das einfacher geht, freue ich mich auch über einen Tipp)

Ich habe entweder die falschen Suchbegriffe, oder ich finde einfach nichts dazu...

1000 Dank
Bob

Re: Formel mit Makro bis ans Ende kopieren

Verfasst: Sa 6. Jan 2018, 17:32
von blackman
Habe eine Lösung gefunden - falls jemand über die Suche hierher kommt

Code: Alles auswählen

 oTabellenblatt.getCellRangebyName("D2:D100").fillAuto(com.sun.star.sheet.FillDirection.TO_BOTTOM,1)
füllt D3 bis D100 mit der weitergeführten Formel aus D2