Bei Worksheet_ Change Löschen ein Problem

Private Sub Worksheet_Change(ByVal Target As Excel.Range)
On Error GoTo Err_Handler
If Target = ThisWorkbook.Sheets("MEP").Range("H41") Then
Vorbereitung.Show
End If
If Target = ThisWorkbook.Sheets("MEP").Range("AP41") Then
Vorbereitung2.Show
End If
Exit Sub
Err_Handler:
Exit Sub
End Sub

Wenn ich nur die beiden oben erwähnten Zellen ändere, erscheinen auch die Userformen. Error-Gedöns für mehrzelliges Einfügen.
Aber wenn ich in irgendeiner Zelle den Inhalt lösche, erscheint auch die Userform (klar, Löschung ist auch eine Änderung....)
Wie bekomme ich es hin, dass die Userform nur bei Änderung, nicht bei Löschung, vor allem nicht in den unbeteiligten Zellen, erscheint?
Vielen Dank im voraus
Mario