Live-Forum - Die aktuellen Beiträge
Datum
Titel
28.03.2024 21:12:36
28.03.2024 18:31:49
Anzeige
Archiv - Navigation
1044to1048
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
Inhaltsverzeichnis

rechtsclick auf diagramm verhindern

rechtsclick auf diagramm verhindern
05.02.2009 15:51:00
Lupo
Hallo zusammen,
wie kann ich verhindern, dass das Kontextmenü angezeigt wird, wenn ich mit der rechten Maustaste auf ein Diagramm bzw. eine Grafik klicke?
Das Tabellenblatt soll allerdings nicht geschützt werden.
Ich habe eine Grafik in ein Tabellenblatt integriert. Die Anzeige des Kontextmenüs bei Rechtsclick auf eine Zelle habe ich bereits erfolgreich durch

Private Sub Workbook_SheetBeforeRightClick(ByVal Sh As Object, ByVal Target As Excel.Range,  _
Cancel As Boolean)
Cancel = True
End Sub


verhindern können, dies wirkt aber nicht auf die Grafik.
Wer kann mir helfen? Vielen Dank!
Lupo

2
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
Diverse Symbolleisten/Kontextmenüs deaktivieren
05.02.2009 16:11:05
NoNet
Hallo Lupo,
m.E. funktioniert das nicht über das Rechtsklick-Ereignis, aber Du könntest bereits zuvor diverse Symbolleisten und Kontextmenüs deaktivieren. Hier mal ein Ansatz, der bereits sehr viele Kontextmenüs deaktiviert :
VBA-Code:
Sub SymbolleisteAusblenden()
    'Grafik-Symbolleite ausblenden :
    Application.CommandBars("Pictures Context Menu").Enabled = False
    'diverse Diagramm-Kontexmenüs ausblenden :
    Application.CommandBars("Chart").Enabled = False
    Application.CommandBars("Object/Plot").Enabled = False
    Application.CommandBars("Pivot Chart Popup").Enabled = False
    Application.CommandBars("Floor and Walls").Enabled = False
    Application.CommandBars("Trendline").Enabled = False
    Application.CommandBars("Plot Area").Enabled = False
    Application.CommandBars("Format Data Series").Enabled = False
    Application.CommandBars("Format Axis").Enabled = False
    Application.CommandBars("Format Legend Entry").Enabled = False
    Application.CommandBars("Series").Enabled = False
End Sub
Zum Aktivieren dieser Elemente bitte das Makro kopieren und alle FALSE durch TRUE ersetzen !
Gruß, NoNet
AW: Diverse Symbolleisten/Kontextmenüs deaktivieren
ptonka

Hi Lupo,
guck mal hier: https://www.herber.de/forum/archiv/700to704/t700397.htm
Gruß,
Ptonka
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige