Live-Forum - Die aktuellen Beiträge
Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Inhaltsverzeichnis

Doppelklickereignis

Forumthread: Doppelklickereignis

Doppelklickereignis
04.11.2014 19:46:27
Andre
Guten Abend liebe Excelspezialisten,
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")

Anzeige

3
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Doppelklickereignis
04.11.2014 20:08:30
Daniel
Hi
anstelle des Target.Value = IIF(...)
Select Case Target.Value
Case "Ja": Target.Value = "Nein"
Case "Nein": Target.Value = "?"
Case Else: Target.Value = "Ja"
end Select
Gruß Daniel

AW: Doppelklickereignis
04.11.2014 21:32:40
Andre
Vielen lieben Dank. So geht klappt es super!!!
Einen schönen Abend noch

Anzeige
AW: Doppelklickereignis
04.11.2014 20:12:09
Uduuh
Hallo,
per Select Case.
Select case target
case "Ja": Target="Nein"
Case "Nein":Target="?"
Case "?":Target="Ja"
End select
Gruß aus’m Pott
Udo

;

Forumthreads zu verwandten Themen

Anzeige
Anzeige
Anzeige
Entdecke relevante Threads

Schau dir verwandte Threads basierend auf dem aktuellen Thema an

Alle relevanten Threads mit Inhaltsvorschau entdecken

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Entdecke mehr
Finde genau, was du suchst

Die erweiterte Suchfunktion hilft dir, gezielt die besten Antworten zu finden

Suche nach den besten Antworten
Unsere beliebtesten Threads

Entdecke unsere meistgeklickten Beiträge in der Google Suche

Top 100 Threads jetzt ansehen
Anzeige