E03: erstellte Menü verschwindet |
Von |
Rainer |
Am |
13. Oktober 2008 um 20:49:21 |
Frage |
Hallo vor dem Fragezeichen habe ich ein eigens erstellte Commandbar. Tabellen mit Daten kann ich Problemlos importieren und weiterbearbeiten. Wenn ich jedoch ein Diagramm erstelle verschwindet mein Commanbar !! Hat jemand eine Lösung meines Problems ? Hier mein Code :Dim i As Integer Dim i_Hilfe As Integer Dim MenüNeu As CommandBarControl Dim Mb As CommandBarControl i = Application.CommandBars(1).Controls.Count i_Hilfe = Application.CommandBars(1).Controls(i).index Set MenüNeu = Application.CommandBars(1). _ Controls.Add(Type:=msoControlPopup, _ Before:=i_Hilfe, Temporary:=True) MenüNeu.Caption = "Meine Funktionen" Set Mb = MenüNeu.Controls.Add _ (Type:=msoControlButton) With Mb .Caption = "Daten exportieren" .OnAction = "Export" .BeginGroup = True 'Trennlinie wird eingefügt .Style = msoButtonIconAndCaption 'muss für die Trennlinie .FaceId = 271 'Discettenzeichen .Enabled = True End With Danke im Voraus Gruß |
|
Antwort: |
Von |
jh |
Am |
14. Oktober 2008 um 12:51:46 |
Antwort |
Hallo,
dein benutzerdefiniertes Control verschwindet nicht, sondern Excel verwendet bei aktivierten Diagrammen eine eigene Menüleiste. Wenn dein Control dort verfügbar sein soll, musst du es auch in die Diagrammleiste einfügen. Sie heißt Application.CommandBars(2) bzw. Application.CommandBars("Chart Menu Bar").
Gruß
|
|
[ VB-/VBA-Forum | Archiv 0413 | Archiv-Übersicht ] |
|