Doppelklickereignis
04.11.2014 19:46:27
Andre
Ich benutze folgenden Code um ein Doppelklickereignis zu erhalten. Bei einem Doppelklick ändert sich der Zellinhalt auf "Ja" beim nächsten auf "?" beim nächsten wieder auf "Ja". Ich benötige aber eine weitere Möglichkeit.
Heißt 1. Doppelklick Ja
2. Doppelklick Nein
3. Doppelklick ?
4. Doppelklick wieder Ja.
Kann mir jemand Helfen?
Vielen Dank
' Doppelklick Ereigniss
Private Sub Worksheet_BeforeDoubleClick _
(ByVal Target As Range, Cancel As Boolean)
If Not Intersect(Target, Range("L1:L200")) Is Nothing Then
Target.Value = IIf(Target.Value = "Ja", "?", "Ja")
Cancel = True
End If
End Sub
Folgende Änderung hat nur eine Fehlermeldung gebracht.Falsche Anzahl an Argumenten oder ungültige Zuweisung zu einer Eigenschaft.
Target.Value = IIf(Target.Value = "Ja", "Nein", "?", "Ja")