Option Explicit
Dim l&

Private Sub CommandButton1_Click()
l = l + 1
Label1.Caption = l
End Sub

Private Sub UserForm_Initialize()
l = 0
Label1.Caption = l
End Sub

Ich habe das Problem mittlerweile lösen können. Bin mir gerade nicht sicher, ob dein Vorschlag das ist, was ich wollte Aber trotzdem vielen Dank

__________________

Alter, die Sprache ist ja ne Krankheit. Aber dein Code stimmt, genau das gleiche wie ich meine.

Kleiner Tipp: Nenn Variablen nicht I oder so. Das behindert die Lesbarkeit. Nenn es doch value oder counter, oder irgendein aussagekräftiger Name.

__________________
"C makes it easy to shoot yourself in the foot; C++ makes it harder, but when you do it blows your whole leg off."

Warum gehen Ameisen nicht in die Kirche? - weil sie InSekten sind.

Achso das I. Ja, das war jetzt nur wegen dem Beispiel. Gebe ihnen sonst immer bessere Namen, wobei selbst die bei größeren Profekten unübersichtlich werden.
Nochmal Danke

__________________