Hallo und einen schönen Sonntag wünsche ich allen. Natürlich auch noch ein glückseliges und vor allen Dingen gesundes neues Jahr.
Ich bin mal wieder auf der Suche nach einer funktionierenden VBA Code Lösung. Ich möchte Call Command eine Funktion einfügen.
Habe dafür versucht einen Code zusammen zu schrieben, der aber nicht funktioniert. Also das nummerische Auflisten führt er nicht aus.
Könnte mir vielleicht hier jemand weiter helfen? Danke und Gruß Josef
Ich bin mal wieder auf der Suche nach einer funktionierenden VBA Code Lösung. Ich möchte Call Command eine Funktion einfügen.
Habe dafür versucht einen Code zusammen zu schrieben, der aber nicht funktioniert. Also das nummerische Auflisten führt er nicht aus.
Könnte mir vielleicht hier jemand weiter helfen? Danke und Gruß Josef
Visual Basic:
Private Sub CommandButton3_Click()
Dim i As Long, lastrow As Long ' String ' Range
With Worksheets("ArbTab")
Application.EnableEvents = False
For i = 2 To lastrow
lastrow = .Range("A" & i) = i - 1
Next
Application.EnableEvents = True
Call UserForm_Initialize
End With
End Sub
Zuletzt bearbeitet von einem Moderator: