Menüleiste - unglaublich
26.01.2005 16:41:12
Toschka
ich bin mit meinem Latein am Ende. Kann sich folgende Problem jemand erklären:
Set newMainMenu = Application.CommandBars(1).Controls.Add(Type:=msoControlPopup, Before:=byt_indexHilfe, Temporary:=True)
Diese Läuft ohen Probleme durch, wenn ich sie in einer leeren Excel Mappe als Makro starte. Wenn ich sie dagegen in ein bestimmtes Programm einfüge erhalte ich nur bei diesem einen Programm Laufzeitfehler: 5
Der Fehler liegt eindeutig an dem Wert nach "Type:=". Und vollkommen unlogischer Weise wird der Wert "msoControlPopup" bei dem einen (wo es funktioniert) als Wert akzeptiert und bei dem anderen (wo es funktioniert) als Variable im Lokal-Fenster aufgeführt.
Wenn ich statt mit mso...-Werten, mit Zahlen arbeite, funktioniert es. Leider weiß ich aber nicht die Zahl für msoContolPopup. Die anderen habe ich herausgefunden:
' 1 msoControlButton
' 2 msoControlEdit
' 3 msoComboNormal
' 4 msoControlComboBox
Kann mir jemand helfen. Ich weiß nicht mehr weiter, wie ich die Zeile zum gehen bringen soll.
Toschka