Hallo,
ich möchte per Makro Zeiten einer Spalte zusammenrechnen. Die einzelnen Dateien sind aber unterschiedlich lang und breit. Außerdem gibt es einen Kopfbereich über 12 Zeilen und einen Randbereich von 2 Spalten links, beides soll nicht in die Berechnung!
Daher springe ich zunächst hinter die letzte gefüllte Spalte, in Zeile 13 mit dieser Formel:
"letztespalte = Sheets(1).Cells(1, 256).End(xlToLeft).Select
ActiveCell.Offset(12, 1).Select"
Hier möchte ich jetzt die Zeiten in Zeile 13 (aktive Zeile) ab Spalte C bis vor die aktive Zelle addieren.
Dazu habe ich mit dem Makrorecorder die zu addierenden Zellen makiert, was zu diesem Formelteil führte:
" Application.CutCopyMode = False
ActiveCell.FormulaR1C1 = "=SUM(RC[-8]:RC[-1])"
Der Bereich RC[-1] ist dabei richtig, der Bereich RC[-8] ist aber falsch. Die Formel soll in der aktiven Zeile die Zellen ab Spalte C, bis vor die aktive Zelle addieren.
Ich habe gedacht, dass ist einfach zu erklären, aber das ist es wohl nicht. Habt ihr Trotzdem verstanden was ich meine?
Ich schicks erstmal so ab. Wenns nicht klappt schick ich ne Datei hinterher.