Private Sub Worksheet_SelectionChange(ByVal Target As Range) If Selection.Count = 1 Then If Not Intersect(Target, Range(abc)) Is Nothing Then Call MyMacro End If End If End Sub Dieser Code funktioniert gut, wenn ich zum Beispiel range ("A1") setze, so dass ein Klick auf A1 das Makro auslöst, jetzt habe ich einen kombinierten Bereich W20: Z20, ich habe den Bereich als ABC referenziert, jetzt, wenn ich zu meinem Blatt zurück gehe Versuchen Sie, auf die Zelle zu klicken. Es erscheint der Fehler "Fehler beim Kompilieren, Variable nicht definiert".
Willkommen bei Superuser.
Wie Máté Juhász sagte, wenn Sie das "abc" If Not Intersect(Target, Range(abc)) Is Nothing Thenin Anführungszeichen setzen, sollte Ihr Code funktionieren.
Diese Codezeile würde folgendermaßen aussehen:
If Not Intersect(Target, Range("abc")) Is Nothing Then