VBA Fehler

Ich habe folgendes Problem in VBA. Ich möchte in Tabelle 1 und in Tabelle 3 jeweils die Inhalte der Zellen c2 bis n2 löschen,
wenn in Tabelle 3 der Inhalt der Zelle a2 gelöscht wird.
Ich habe folgenden (fehlerhaften) Code in Tabelle 3.

Private sub worksheet_change(ByVal Target as Range)
If Range("a2") = empty then
sheets("Tabelle 1").Range("c2:n2") and sheets("Tabelle 2").Range("c2:n2") = empty
end if
end sub

Ich bekomme jetzt als Fehlermeldung "Typen unverträglich".
Habe auch schon in der Hilfe geschaut,bin aber anscheinend zu blöd das hinzukriegen. Vielleicht weiß jemand von Euch den Fehler ? Danke shon mal.

Gruß Klaus