Hallo Freunde
wie bekomme ich einen Offset? Die Datenquelle ist 78 Spalten nach rechts versetzt.
Der Code kopiert 1 zu 1.
Sheets("M 1").Range(Cells(2, 41), Cells(862, 71)).Resize(861, 31).FormulaR1C1 = "='[" & Sheets("N").Range("L5") & "]Dienstplan'!RC"
Danke
Hi
Wie schon erwähnt: Formel von Hand funktionsfähig in eine Zee schreiben und anschauen, dann siehst du wie du deinen Formelstring zusammen stellen musst.
Damit du die R1C1-Schreibweise siehst, markiere die Zelle und gebe im Direktfenster folgendes ein ein: ?Selection.FormulaR1C1
Und wie gesagt, entweder Range(Cells(), Cells()) oder Cells().Resize()
Aber beides kombiniert ist überflüssig (hatte ich dir aber schon erklärt
Weiterhin: wenn du bei Range(Cells(), Cells()) vor dem Range das Tabellenblatt angibst, dann muss es auch vor den beiden Cells innerhalb der Range stehen (was für die Variante mit Cells.Resize spricht.
Gruß Daniel