Live-Forum - Die aktuellen Beiträge
Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Inhaltsverzeichnis

CommandBars

Forumthread: CommandBars

CommandBars
10.09.2003 17:05:58
nadine
Hallo zusammen,

ich habe bei einer Datei folgendes hinzugefügt, um in der obersten Symbolleiste einen weiteren Menüpunkt zu bekommen:

Set ergänz = Application.CommandBars("Worksheet Menu Bar").Controls.Add(Type:= _
msoControlPopup, Before:=10, temporary:=True)
ergänz.Caption = "neuer Menüpunkt"

Ein Makro führt die Ergänzung beim Öffnen der Datei aus und ein weiteres entfernt den Menüpunkt sobald die Datei wieder geschlossen wird.
Funktioniert soweit alles bestens.

Mein Problem:
Wenn von diesem Dateityp nacheinander mehrere Dateien geöffnet werden, dann wird jedesmal dieser Menüpunkt eingefügt und in der obersten Symbolleiste stehen dann mehrere identische Menüpunkte...
Kann mir jemand sagen, wie eine If-Abfrage aussehen müsste, die checkt, ob dieser Menüpunkt schon vorhanden ist, und nur wenn nicht, ihn hinzufügt?

Danke für Eure Hilfe...
Anzeige

1
Beitrag zum Forumthread
Beitrag zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: CommandBars
10.09.2003 18:51:32
K.Rola
Hallo,

du musst halt alle controls in einer Schleife auf die caption hin
testen.

Gruß K.Rola
Anzeige
;

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Entdecke mehr
Finde genau, was du suchst

Die erweiterte Suchfunktion hilft dir, gezielt die besten Antworten zu finden

Suche nach den besten Antworten
Unsere beliebtesten Threads

Entdecke unsere meistgeklickten Beiträge in der Google Suche

Top 100 Threads jetzt ansehen
Anzeige