ich habe schon viel experimentiert, aber konnte mein krudes Problem nicht lösen. Folgendes: Ich lasse in einer Datei einen CommandBar anlegen. Dieser enthält ein SubMenü mit einem Button, einer ComboBox und einem EditField. Beim Anlegen bekommt jedes Element einen Tagging Wert zugewiesen. Wenn ich nun über den Klick auf den Button Page: SetUp die Prozedur Page_SetUp auslese, dann möchte ich in dieser Prozedur die Einstellungen der ComboBox und des EditFields ermitteln. Hierzu verwende ich Application.CommandBars.FindControls(Tag:= xyz).Item(1). Dies hat bisher auch immer sehr gut funktioniert, aber in diesem speziellen Fall hat es mir viel Zeit und Nerven geraubt, da ich diese Unlogik nicht für möglich hielt. Z.B. die Suche nach der ComboBox, die mit CPstrCmbBox_Footer getagged ist. Sie wird in der gesamten Datei nur einmal angelegt, aber als Ergebnis steht im Debug.Print 21. Auch wird der Text (Katze) nicht korrekt ermittelt. Selbiges gilt für das EditField. Als Wert steht 100 drin, aber im Debug.Print sehe ich 80.
https://www.herber.de/bbs/user/74341.xls
Ich komme nicht weiter. Ich könnte sicherlich auch eine Konstruktion ohne .FindControls erreichen, aber dieser Fehler ist so unlogisch, daß ich gern noch eine andere Expertenmeinung aus dem Forum zu diesem Problem gehört hätte. Oder habe ich etwas Elementares übersehen oder falsch programmiert? Die Microsoft Hilfeseiten und das Internet haben bisher keine weiterführenden Informationen gebracht.
Ich würde mich sehr freuen, wenn jemand zur allgemeinen Erhellung seine Ideen und Vorschläge unterbreiten würde.
Vielen Dank und Grüße, Andreas Hanisch
PS: Vielleicht ist das ja nur auf meiner Maschine so und bei jemand anderem funktioniert es