Live-Forum - Die aktuellen Beiträge
Anzeige
Archiv - Navigation
388to392
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
388to392
388to392
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Inhaltsverzeichnis

"Anpassen" verhindern

"Anpassen" verhindern
25.02.2004 09:19:16
Galenzo
Hallo,
mal was zum knobeln, bei dem ich bis heute nicht weiterkomme:
Wie kann ich das "Anpassen"-Menü bei einem Rechtsklick in eine Symbolleiste verhindern?
mfg

4
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: "Anpassen" verhindern
25.02.2004 09:30:24
AndreasS
Hi, vielleicht kann ich dir ja helfen:
https://www.herber.de/forum/archiv/308to312/t310918.htm:
Die ID für das Anpassen-Fenster ermitteln:
Die ID für das Anpassen-Fenster ist 797
folgender Code also:

Sub NoCust()
Dim cbl As CommandBarControls
Set cbl = CommandBars.FindControls(ID:=797)
For i = 1 To cbl.Count
cbl(i).Enabled = False
Next i
End Sub

Da das Fenster "Anpassen" sich immer noch öffnet, wenn man neben eine Symbolleiste doppelklickt:
Application.OnDoubleClick = "NoAction"
Die Prozedur NoAction enthält keine Befehle:

Sub NoAction()
End Sub

Beim Schließen der Mappe:
Application.OnDoubleClick = ""
Hast du das schon mal getestet?
Gruß Andreas
Anzeige
AW: "Anpassen" verhindern
25.02.2004 09:48:38
Galenzo
Danke Andreas,
das kannte ich noch nicht - werd' ich mal ausprobieren.
mfg
AW: "Anpassen" verhindern
25.02.2004 12:02:29
Bert
In XP gibts den Befehl: DisableCustomize
Bert
AW: "Anpassen" verhindern
25.02.2004 12:17:36
Galenzo
toll - das ist ja noch besser!

300 Forumthreads zu ähnlichen Themen

Anzeige
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige