Nummerierung mit Name
Manfred
habe einiges durchsucht aber nichts passendes gefunden.
Kann mir jemand sagen wie ich das Makro umbauen muß um
die Nummerierung in Spalte A mit Namen zu erhalten ?
Ich komme nicht dahinter.
z.B.:
Manni 1
Manni 2
Manni 3
usw
Private Sub Worksheet_Activate()
'Nummerierung_der_Spalte_A()
Dim x As Integer
For x = 2 To Cells(Rows.Count, 2).End(xlUp).Row ' Nummeriert ab Zeile 2,
Cells(x, 1) = x - 1
Next
End Sub
Mit freundlichen Grüßen
Manfred
Anzeige