Problem mit Worksheet_Change

Programm:
Sub Worksheet_Change(ByVal Target As Range)
If Target = "Presse" And Target.Column = 2 Then
End if
End sub

und zwar immer wenn ich nun etwas aus "B" mit entfernen lösche erscheint:
-> Typen unverträglich
Ich habe allerdings echt keine Ahnung woran das liegen kann.
Ich würde mich freuen wenn mir einer weiterhelfen kann.
Vielen Dank
André