Ich habe folgendes Problem
Ich möchte von VBA in einem Sheet eine Formel nach unten kopieren lassen.
Bislang sieht das bei mir so aus:
Range("G1:G1").Select
ActiveCell.FormulaR1C1 = "=IF(RC[-2]="""","""",C[-1]/C[-2])"
Selection.AutoFill Destination:=Range("G1:G40"), Type:=xlFillDefault
Ich möchte aber, dass nicht bis G40 runterkopiere wird, sondern nur so lange, wie in den Spalten links (die von der Formel angesprochen werden) überhaupt was steht. Wie kann man da in der Range-Zuweisung einen variablen Wert einfügen und wie kann ich in den Spalten links die Anzahl der nicht-leeren Zeilen ermitteln, um dieser Variable den entsprechenden Wert zuzuweisen. (Sorry für die umständliche Ausdrucksweise - hoffe das Problem wird trotzdem klar).