Doppelklick
11.02.2016 11:34:03
Jochen
Jedoch soll die genaue Filterung davon abhängig sein in welches Feld man klickt (C4:E10) oder eben F4:G10.
Jedoch erhalte ich eine Fehlermeldung beim 2. Teil meiner If-Funktion, diese kann scheinbar nicht richtig angesteuert werden.
Wo liegt mein Fehler?
Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
Cancel = True ' wird benötigt um die Standardfunktion Doppelklick zu deaktivieren (sonst werden _
_
zwei Funktionen gleichzeitig gestartet und es kracht)
' Doppelclick nur in definierten Zellen(-Bereich) möglich
If Intersect(Target, Range("C4:E10")) Then
Call Anzeige_Zahl(Target, Cancel)
Else Intersect(Target, Range("F4:G10"))
Call Anzeige_Zahl100(Target, Cancel)
End Sub
Anzeige