Thema Datum  Von Nutzer Rating
Antwort
16.06.2016 08:30:52 Thunderstruck
NotSolved
16.06.2016 10:08:26 Crazy Tom
NotSolved
16.06.2016 11:01:52 Gast72164
NotSolved
Blau Aktion wenn Linke Mastaste (Einfachklick)
 16.06.2016 11:16:34 Crazy Tom
NotSolved
16.06.2016 12:38:57 Gast8217
NotSolved

Ansicht des Beitrags:
Von:
Crazy Tom		 Datum:
16.06.2016 11:16:34		 Views:
716		 Rating:
     
Antwort:
  Ja
Thema:
Aktion wenn Linke Mastaste (Einfachklick)

Hi

dann nimm doch lieber den Rechtsklick

Private Sub Worksheet_BeforeRightClick(ByVal Target As Range, Cancel As Boolean)
    If Not Intersect(Target, Range("B4:B13")) Is Nothing Then
    Cancel = True
    ' Zelle ändern
    Application.EnableEvents = False
        If Target.Value = "" Then
            Target.Value = "a"
            GoTo Ende
        End If
        If Target.Value = "a" Then
            Target.Value = "x"
            GoTo Ende
        End If
        If Target.Value = "x" Then
            Target.Value = ""
            GoTo Ende
        End If
Ende: Application.EnableEvents = True
    End If
End Sub

 

die Formatierung hier im Forum geht nicht mit allen Browsern

mit dem Firefox und Microsoft Edge geht es jedenfalls

unter WIN7 mit IE11 geht es nicht

 

MfG Tom

Ihre Antwort
  • Bitte beschreiben Sie Ihr Problem möglichst ausführlich. (Wichtige Info z.B.: Office Version, Betriebssystem, Wo genau kommen Sie nicht weiter)
  • Bitte helfen Sie ebenfalls wenn Ihnen geholfen werden konnte und markieren Sie Ihre Anfrage als erledigt (Klick auf Häckchen)
  • Bei Crossposting, entsprechende Links auf andere Forenbeiträge beifügen / nachtragen
  • Codeschnipsel am besten über den Code-Button im Text-Editor einfügen
  • Die Angabe der Emailadresse ist freiwillig und wird nur verwendet, um Sie bei Antworten auf Ihren Beitrag zu benachrichtigen
Thema: Name: Email:



  • Bitte beschreiben Sie Ihr Problem möglichst ausführlich. (Wichtige Info z.B.: Office Version, Betriebssystem, Wo genau kommen Sie nicht weiter)
  • Bitte helfen Sie ebenfalls wenn Ihnen geholfen werden konnte und markieren Sie Ihre Anfrage als erledigt (Klick auf Häckchen)
  • Bei Crossposting, entsprechende Links auf andere Forenbeiträge beifügen / nachtragen
  • Codeschnipsel am besten über den Code-Button im Text-Editor einfügen
  • Die Angabe der Emailadresse ist freiwillig und wird nur verwendet, um Sie bei Antworten auf Ihren Beitrag zu benachrichtigen

Thema Datum  Von Nutzer Rating
Antwort
16.06.2016 08:30:52 Thunderstruck
NotSolved
16.06.2016 10:08:26 Crazy Tom
NotSolved
16.06.2016 11:01:52 Gast72164
NotSolved
Blau Aktion wenn Linke Mastaste (Einfachklick)
 16.06.2016 11:16:34 Crazy Tom
NotSolved
16.06.2016 12:38:57 Gast8217
NotSolved