Symbolleiste

Bild

Betrifft: Symbolleiste von: gio
Geschrieben am: 01.04.2005 07:34:33

Hallo,
es kommt eine Fehlermeldung...?
Makro läuft nicht, es hängt bei ccb wenn ich auf anderen rechner starte????
Danke im voraus
Gruss
gio

Anmerkung: Makro ist in einem Modul

'Symbolleiste mit Menü mit Untermenü erstellen

Sub Auto_Open()
On Error Resume Next
Application.CommandBars("Menü-Montageanleitung").Delete 'eventuell bestehende Leiste erst löschen
'Commandbar erstellen
set ccb=commandbars.add(Name:="Menü-Montageanleitung",temporary:=true)
----FEHLERMELDUNG HIER???---


'Menü erzeugen
Set ccbDu = ccb.Controls.Add(msoControlPopup)
ccbDu.Caption = "Überschrift"

'Menüzeilen erstellen
Set pop1 = CommandBars("Menü-Montageanleitung").Controls(1)

'erste Menüzeile erzeugen
With pop1.CommandBar.Controls.Add(Before:=1, Type:=msoControlButton)
.Caption = "neue Überschrift gross"
.OnAction = "neuInhalt"
.FaceId = 12
End With
...
...
.

Bild


Betrifft: AW: Symbolleiste von: Mathias
Geschrieben am: 01.04.2005 08:14:27

schau mal vielleicht hilft dir das weiter

http://www.schmittis-page.de/excel/menue/menue.htm

Gruss
Mathias


 Bild

Beiträge aus den Excel-Beispielen zum Thema "Symbolleiste"