Nur bei Zahlen
24.06.2003 17:06:51
Ralf
Ich möchte euch nochmals um eure Hilfe bitten.
Ich habe hier ein Makro mit dem ich eine Fortlaufende Nummerrierung durchführe wenn in B etwas eingefügt wird.
Jetzt möchte ich wissen , ob die Formel so umgestellt werden kann, das sie nur etwas in A einfügt, wenn in B eine Zahl eingefügt wird. Und wenn ein Text geschrieben wird soll gar nichts passieren.
Option Explicit
Private Sub Worksheet_Change(ByVal Target As Range)
Dim N As Long
lgNummer = 1
If Target.Column = 2 And Target.Row > 4 Then
For N = 5 To [b65536].End(xlUp).Row
If Cells(N, 2) <> "" Then
Cells(N, 1) = lgNummer
lgNummer = lgNummer + 1
End If
Next
End If
End Sub
MfG
Ralf
Anzeige