Werte fortlaufend in Zellen eintragen (fortlaufende Nummerierung)

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

Anmeldung an Excel-Arbeitsmappe

Mit Hilfe von VBA kann man Abragedialoge ausführen und den Benutzer zur Eingabe bestimmter Informationen auffordern, bevor er mit der Arbeitsmappe arbeiten darf.

In dem nachfolgenden Beispiel wird die Funktionsweise erläutert.
Die Tabelle, in der alle Werte der Anmeldung gespeichert werden sollen wird im Beispiel mit Verant bezeichnet.

Code