Worksheet-Change Makro

Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Column = 1 Then
Target = Left(Target, Len(Target) - 1)
End If
End Sub

Der Zweck ist, nach jeder Eingabe in der Spalte A diese Eingabe um eine Stelle zu kürzen. Komischerweise läuft das Makro, wenn ich auf die Anweisungs-Zeile "Target =..." einen Haltepunkt setze, problemlos durch, wenn ich den aber rausnehme, bekomme ich einen Fehler.
Ich hatte testhalber den Wert schon als Variable deklariert (x = Len(Target)), hier ebenfalls ein unterschiedliches Ergebnis: Mit Haltepunkt bekommt die Variable den korrekten Wert der Länge der Zeichenfolge, ohne Haltepunkt ist die Variable = 0.
Warum? Was mache ich falsch?
Gruß
David