Live-Forum - Die aktuellen Beiträge
Datum
Titel
27.04.2024 16:48:06
Formel gibt Falsch aus und ich weiß nicht warum - VBA
27.04.2024 14:45:54
Verknüpfung Tabelleneinträge mit Datumsspalte
27.04.2024 12:08:58
Mittelwertwenn - ich kapiere es nicht :-(
26.04.2024 21:51:33
Idee für Grafik
Du findest keine passende Antwort auf Deine Frage?
Stelle Deine Frage in unserem Live-Forum
Anzeige
Archiv - Navigation
1916to1920
Aktuelles Verzeichnis
Verzeichnis Index
Übersicht Verzeichnisse
Vorheriger Thread
Rückwärts Blättern
Nächster Thread
Vorwärts blättern
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
1916to1920
1916to1920
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Worksheet_BeforeRightClick

Worksheet_BeforeRightClick
04.02.2023 10:49:38
Thomas
Hallo Excelfreunde,
kennt jemand von euch einen Trick wie man das
"Worksheet_BeforeRightClick " Ereignis auf bestimmte Zeilen einschränken kann?
Sobald ich den Code:
Private Sub Worksheet_BeforeRightClick(ByVal Target As Range, Cancel As Boolean)
MsgBox "Hallo"
Cancel = True
End Sub
im Tabellenblatt habe funktioniert im gesamten Tabellenblatt das Kontexmenü nicht mehr.
mfg thomas

5
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Worksheet_BeforeRightClick
04.02.2023 11:07:50
Matthias
Hallo,
z.B so:
Private Sub Worksheet_BeforeRightClick(ByVal Target As Range, Cancel As Boolean)
  If Target.Row > 5 Then
  MsgBox "Hallo" 
  Cancel = True
 End If
End Sub
Im Bsp.:
Nur wenn die aktive ZeilenNummer größer 5 ist greift der Code.
Einfach an Deine Bedürfnisse anpassen.
MfG Matthias
AW: Worksheet_BeforeRightClick
04.02.2023 11:13:49
Piet
Hallo
  • Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
If Not Intersect(Range("B2:D10"), Target) Is Nothing Then
   MsgBox Target.Address
End If
End Sub

    • probier es bitte mal so
    mfg Piet
    Anzeige
    AW: Worksheet_BeforeRightClick
    04.02.2023 15:44:45
    Thomas
    Hallo Piet und Matthias,
    habt rechtvielen Dank für eure Vorschläge.
    Beide Versionen funktionieren.
    Habt rechtvielen dank für eure Hilfe.
    mfg thomas
    AW: Worksheet_BeforeRightClick
    04.02.2023 12:02:52
    GerdL 
    Private Sub Worksheet_BeforeRightClick(ByVal Target As Range, Cancel As Boolean)
Cancel = Not Intersect(Range("A1:C2,F1:F9"), Target) Is Nothing
If Cancel Then MsgBox "mach was"
End Sub
    Gruß Gerd
    AW: Worksheet_BeforeRightClick
    04.02.2023 18:08:30
    Thomas
    Hallo GerdL,
    ich habe gerade erst gesehen das du uach noch einen Idee hattest. Sorry.
    Diese funktioniert auch super.
    Das man hier gleich verschiedene Bereiche mit angeben kann ist eine super Sache.
    hab rechtvielen dank.
    mfg thomas
    Anzeige

    48 Forumthreads zu ähnlichen Themen

    Worksheet_BeforeRightClick
    Timo

    Hallo,
    ich hab folgenden Code
    Private Sub Worksheet_BeforeRightClick(ByVal Target As Range, Cancel As Boolean) UserForm1.Show End Sub
    Nachdem ich mir über die Userform Inhalte in die aktive Zelle geschrieben habe wird die Userform wieder geschlossen. Doch nun ist das Kontexmenu n...
    27.11.2008 14:52:00
    Thread-ID: 1028398
    3 Beiträge
    Anzeige
    BeforeDoubleClick geht nicht
    Stefan

    Hi Spezialisten
    Habe ein komisches Phänomen,
    Ich öffne von Datei a die Datei b. Es klappt alles wunderbar. Wenn ich in der Datei b bin und mich dort in den Userformen bewege ist auch noch alles gut. Gehe ich aber von der Userform in Datei b in ein Tabellenblatt und möchte zurück zu ein...
    29.03.2009 20:45:58
    Thread-ID: 1065125
    2 Beiträge
    Workbook_SheetBeforeDoubleClick - Problem mit Sh
    Peter

    Guten Tag
    Bei der Bearbeitung einer Datei lege ich mir immer wieder eine Index-Tabelle an, in denen alle Tabellennamen eingetragen werden.
    Bei Doppelklick auf einen Eintrag soll die entsprechende Tabell ausgewählt werden.
    Ich habe zwei Fragen:
    1) Weshalb läuft der untenstehende...
    28.12.2010 14:31:19
    Thread-ID: 1193070
    4 Beiträge
    Anzeige
    Worksheet_BeforeRightClick Problem
    Martin

    Hallo zusammen
    mit einem Worksheet_BeforeRightClick blende ich ein weiteres Tabellenblatt ein und selektiere es. Leider erscheint dann im selektierten Blatt immer gleich das normale Rechtsklick-Menü (mit Kopieren, Einfügen, Formatieren etc.). Wie kann ich das ausschalten trotz dem Worksheet...
    28.06.2011 09:44:21
    Thread-ID: 1219981
    4 Beiträge
    Workbook_SheetBeforeDoubleClick
    Claudia

    Hallo alle zusammen,
    ich habe eine Datei mit 21 Blätter (Masch1 - Masch21). Nun möchte ich gerne mittels Doppelklick und dann mit einer Auswahl in Spalte D in den Zellen D10 - D40 jeweils einen Buchstaben eintragen und zwar z, h, n. Mit Daten Gültigkeit möchte ich ungern arbeiten da das seh...
    16.02.2012 16:20:09
    Thread-ID: 1251031
    3 Beiträge
    Worksheet_BeforeDoubleClick
    Wolfgang

    Hallo liebe Helfer
    ich möchte in einem geschützten Tabellenblatt bei einem
    Doppelklick auf bestimmte Zellen ( F18 bis 22 )
    in der jeweiligen Reihe die Zellen B18 bis B22 von O auf 1
    oder zurück ändern.
    Egal was ich mache, ich bekomme immer die Meldung: die Zelle ist schreib...
    08.07.2013 15:22:23
    Thread-ID: 1321535
    3 Beiträge
    Worksheet_BeforeDoubleClick
    Horst

    HalloMit dem Ereigniss "Worksheet_BeforeDoubleClick" reagiere ich in dem Tabellenblatt(x) auf einen Doppelklick und wechsle mit Sheets("Tabellenblatt(y)").Select auf ein anderes Tabellenblatt, was optisch auch gelingt, das Tabellenblatt (Y) wird angezeigt.
    Aber bei allen Befehlen muss ich ex...
    21.07.2002 20:01:25
    Thread-ID: 138842
    3 Beiträge
    Uf öffnet aus Worksheet_BeforeDoubleClick
    Thorsten_Z

    Moin liebes Forum,
    Ich brauche einmal Hilfe!
    Folgender Code öffnet mir durch Doppelklick in Spalte A des Tabellenblattes die Userform5. Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean) If Not Intersect(Target, [A:A]) Is Nothing Then Userform5.Show Cancel...
    12.09.2014 20:58:28
    Thread-ID: 1381413
    8 Beiträge

    Beliebteste Forumthreads (12 Monate)

    Anzeige
    Jetzt das Excel-Portal bewerten: Deine Stimme zählt!

    Beliebteste Forumthreads (12 Monate)

    Anzeige
    Anzeige
    Anzeige
    Archiv - Verwandte Themen
    Forumthread
    Beiträge
    2
    4
    1
    3
    5
    3
    2
    2
    2
    7
    11
    7
    11
    5
    3
    1
    2
    5
    5
    1
    2
    2
    2
    2
    2