Hallo zusammen!
in meinem Makro wird ein Bereich (5 Spalten, 300 Zeilen), der mit einem Namen versehen ist (Wirt_01), kopiert, an anderer Stelle eingefügt, neu benannt (Wirt_02)und das ganze mehrfach.
Nun soll in einer bestimmten Zelle in diesem benannten Bereichen (1. Spalte im Bereich, Zeile 300) die Formel mit der Formel aus einer festen Zelle (E300) überschrieben werden.
Kann man eine Zelle relativ zu einem aktiven Bereich ansteuern?
So wie es unten steht, funktioniert es leider nicht.
ActiveSheet.Range("E300").Copy
ActiveSheet.Range("Wirt_02").Activate
ActiveSheet.Range(ActiveCell, ActiveCell.Offset(300, 0)).Select
Selection.PasteSpecial Paste:=xlPasteFormulas, Operation:=xlNone, SkipBlanks:=False, Transpose:=False
Vielen Dank für eure Hilfe und beste Grüße!
mayblue
|