Live-Forum - Die aktuellen Beiträge
Datum
Titel
26.09.2025 22:18:24
Liste mit Links - tricky
26.09.2025 18:34:36
Welches Datum gibt mein M-Code aus?
26.09.2025 10:29:46
Wert aus einer Zelle bei jeder Eingabe in neue Zelle
26.09.2025 08:51:00
Teilinhalt einer Zelle vergleichen
Keine passende Antwort im Forumarchiv gefunden?
Stelle deine Frage im Live-Forum
Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
976to980
976to980
Aktuelles Verzeichnis
Verzeichnis Übersicht
Verzeichnis Übersicht
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Kontextmenü Grafik

Forumthread: Kontextmenü Grafik

Kontextmenü Grafik
18.05.2008 03:03:00
Mathias
Hallo,
ich würde gern das Kontextmenü, das bei Rechtsklick auf eine eingefügte Grafik erscheint deaktivieren
oder alternativ ein Makro ausführen.
Hat jemand ´ne Idee?
Viele Grüße
Mathias

Anzeige

6
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Kontextmenü Grafik
18.05.2008 06:42:00
Herby
Hallo Mathias,
probiers mal so:

Sub test()
Dim i As Integer
For i = 1 To CommandBars.Count
If CommandBars(i).Type = msoBarTypePopup Then
Application.CommandBars(i).Enabled = False
End If
Next i
End Sub


Viele Grüße
Herby

Anzeige
AW: Kontextmenü Grafik
18.05.2008 11:49:40
Mathias
Hallo Herby,
da kommt bei mir nur "Fehler: Variable nicht definiert" (msoBarTypePopup)
Wo müßte ich den Quellcode denn reinschreiben?
In Worksheet_BeforeRightClick(ByVal Target As Range, Cancel As Boolean)
oder vielleicht in Private Sub Worksheet_SelectionChange(ByVal Target As Range) ?
Viele Grüße
Mathias

Anzeige
AW: Kontextmenü Grafik
18.05.2008 09:40:00
Fred
Hi,
Grafik ist ein Sammelbegriff, welche Art Grafik ist gemeint?
mfg Fred

AW: Kontextmenü Grafik
18.05.2008 11:45:14
Mathias
Hi Fred,
eine in Excel eingefügte JPG-Datei.
Viele Grüße
Mathias

AW: Kontextmenü Grafik
18.05.2008 12:08:00
K.Rola
Hallo,
Code in das Modul von "DieseArbeitsmappe" kopieren.

Private Sub Workbook_Activate()
Application.CommandBars("Pictures Context Menu").Enabled = False
End Sub




Private Sub Workbook_Deactivate()
Application.CommandBars("Pictures Context Menu").Enabled = True
End Sub


Gruß K.Rola

Anzeige
AW: Kontextmenü Grafik
18.05.2008 17:01:00
Mathias
Hallo,
vielen Dank für denn Tipp. Funktioniert einwandfrei.
Viele Grüße
Mathias
;

Beliebteste Forumthreads (12 Monate)

Jetzt das Excel-Portal bewerten: Deine Stimme zählt!
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