Worksheet_Change und Fehler 1004

[RPP63]

Moin!
Oder man verzichtet auf .Activate und .Select und nimmt gleich die "richtige" Methode:

Code:

Private Sub Worksheet_Change(ByVal Target As Range)
  If Target.Address = "$A$1" Then
    Application.Goto Worksheets("Kamelle").Range("B18")
  End If
End Sub

Gruß Ralf