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
Anzeige
Inhaltsverzeichnis

Kontextmenü Grafik

Forumthread: Kontextmenü Grafik

Kontextmenü Grafik
18.05.2008 05: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 08: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 13: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 11:40:00
Fred
Hi,
Grafik ist ein Sammelbegriff, welche Art Grafik ist gemeint?
mfg Fred

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

AW: Kontextmenü Grafik
18.05.2008 14: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 19:01:00
Mathias
Hallo,
vielen Dank für denn Tipp. Funktioniert einwandfrei.
Viele Grüße
Mathias
Jetzt das Excel-Portal bewerten: Deine Stimme zählt!
Anzeige
Anzeige
Live-Forum - Die aktuellen Beiträge
Datum
Titel
14.05.2026 13:31:09
Zeichen ausblenden
14.05.2026 09:50:42
Makro für MacOs
13.05.2026 19:14:18
Gleichheitszeichen
13.05.2026 14:24:56
VBA Projekt Passwort automatisch eingeben
13.05.2026 08:49:41
Reale Berechnung ohne Nachkommawerte
Keine passende Antwort im Forumarchiv gefunden?
Stelle deine Frage im Live-Forum