Problem mit dem ComboBox Handling in VBA

Hardball

Ensign
Registriert
Feb. 2005
Beiträge
222
Hallo Zusammen

Seit bald 2 Tagen versuche ich unter zu Hilfenahme von Büchern, Internet und fragen aller Möglicher Pers. in meinem Umfeld ein Problem zu lösen.

Ich möchte mittels VBA ein Produktkonfigurator aufbauen und habe mir vorgestellt das ich die Application und 3 Teile aufteile.

1. Teil das Layout (UserInterface) im Excel auf Tabelle1 ("UserInterface")

2. Teil der VBA Code welcher mit dem Benutzer interagieren muss, sprich
je nach dem was der Benutzer macht sollen andere Aktionen im Layout
ausgelöst werden.

3. Teil Tabelle2 ("DataBase") ist die Datenbank welche alle nötigen infos
bereitstellt und von der aus auch die Auswahlfelder und
Texte geholt werden sollen

Mein Problem ist jetzt, wie kann ich die doch recht grosse Menge an ComboBoxen mit den Daten abfüllen ohne das ich beim beenden der Excel Instanz eine Fehler- meldung bekomme??

ich habe mir vorgestellt das ich einfach ein Modul erstelle in dem ich für jedes Abfüllevent ein eigenes Sub programmiere, in dem ich die Combobox aus der Tabelle1 angebe und mit dem "listfillrange" Befehl und dem Bereich aus der Tabelle2 die Infos in die ComboBox fülle. Das klappt auch so weit aber sobald ich das File beende, erhalte ich eine Fehlermeldung und zwar je nach dem wie ich die ComboBox im Modul anspreche.

verwende ich die syntax:
Worksheets("UserInterface").cboPower1a.listfillrange="DataBase!aa9:aa21"

ergibt das beim Beenden den Laufzeitfehler 1004! ABER erst beim Beenden!

verwende ich aber die Syntax:
Tabelle1.cboPower1a.listfillrange="DataBase!aa9:aa21"

ergibt das beim Beenden die Fehlermeldung:

Fehler beim Kompilieren:
Methode oder Datenobjekt nicht gefunden

Beim Debuggen ist dann das Objekt cboPower1a als nicht gefunden
markiert. Ich habe dann probehalber mal den Objektnamen im Befehl gelöscht und
über "Tabelle1." versucht dieses wieder zu finden jedoch ohne Erfolg.
wenn ich aber das Programm starte und an der selben stelle den Objektnamen
cboPower1a im Befehl lösche und mit Tabelle1. wieder danach suche kann ich es finden.

Weiss Jemand was ich falsch mache oder wo der Fehler liegt??

Ich bin langsam am verzweifeln weil ich die Appllication fertigstellen möchte und einfach nicht weiter komme.

für Hinweise und Hilfestellungen wäre ich dankbar

Gruss
Hardball
 
Zurück
Oben