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

Warum ist die Menüleiste jetzt Hellgrau?

Warum ist die Menüleiste jetzt Hellgrau?
13.03.2008 20:15:00
Walter
Hallo nochmal,
Menülleiste ist eingeblendet aber jetzt Hellgrau, kann keine Menüschrift
anklicken ?
mfg Walter mb

3
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
Das habe ich von Ramses gefunden aber
13.03.2008 20:55:00
Ramses
Hallo Zusammen,
das habe ich von Ramses gefunden:

Sub Grau()
Change_Control_State
End Sub


'----------- Beschriftungsleiste ------------------------------


Function Change_Control_State()
'(C) Ramses
Dim i As Long
Dim myCmdBar As CommandBar, myCnt As CommandBarControl
Set myCmdBar = Application.CommandBars("Worksheet Menu Bar")
For Each myCnt In myCmdBar.Controls
myCnt.Enabled = Not myCnt.Enabled
Next
End Function


funktioniert leider nicht: Fehler: Fehler beim Kompilieren
Benutzerdefinierter Tyt nicht definiert
mfg Walter mb

Anzeige
AW: Das habe ich von Ramses gefunden aber
13.03.2008 21:02:00
Ramses
Hi,

Sub til()
Dim C As Object
Application.CommandBars(1).Enabled = True
For Each C In Application.CommandBars(1).Controls
C.Enabled = Not C.Enabled
Next
End Sub


mfg Kurt

Klappt !!! -)
13.03.2008 21:13:00
Walter
Hallo Kurt,
habe zwar nicht verstanden aber es funktioniert !
mfg Walter mb

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige