Mit Hilfe eines Makros ist es möglich Werte fortlaufend in eine Spalte schreiben zu lassen.
In diesem Beispielt wird eine fortlaufende Nummerierung in den Bereich H3:H10 eingetragen.
Sub Wertfortlaufend() ' fortlaufendeZahl Makro Sheets("Grunddaten").Select Range("h3").Select ActiveCell.FormulaR1C1 = "=R[-1]C+1" Range("h3").Select Selection.AutoFill Destination:=Range("h3:h10"), Type:=xlFillDefault Range("h3:h10").Select End Sub