Office: Mit VBA Excel UserForm auf automatisch erzeugte OptionButton zugreifen

Hallo,

Versuche schon seit Stunden auf automatisch erzeugt OptionButton mittels einem vb Makro für Excel zu zugreifen.

Ich habe mir ein Modul erstellt in dem ich das UserForm1 mit Inhalt Fülle und die OptionButton Anwendungsbedient erzeuge lassen (Anzahl). Dies geht auch super mit folgendem Code:

Code:

Jetzt habe ich meine OptionButton in dem UserForm erzeugt und würde gerne Auswerten auf welchen OptionButton der User gedrückt hat. Nur leider bekomme ich immer nur Fehler, wenn ich dies versuche.

Ich habe mir im UserForm1 einen weigern Button erstellt und hinter diesem mit diesem Code:

Code:

Versucht den OptionButton ansprechen. Leider bekomme ich immer nur die Fehlermeldung, dass das Datenobjekt nicht vorhanden ist. Was mich an dieser Stelle extrem verwundert, ist wenn ich alle Controlobjekt des UserForm ausgeben, das mir dann die OptionButton korrekt ausgeben werden.

Code:

Ich hoffe das einer von euch mir sagen kann warum, vb ein Objekt nicht findet was eigentlich vorhanden ist und auch gefunden wird.

Danke

Gruß

Bongartz120

:)

 

Hallo Bongartz120,

prbier mal:

Code:

Grüße
EarlFred

 

Grüße
EarlFred

Cool Danke so geht es schon mal.

Jetzt muss ich nur noch heraus finden wie mit bekomme das eine UserForm ausgewählt worden ist.

Gibt es dafür eine Methode die im Hintergrund das abfragt?

 

Hi,

ich würde es ja generell mit Klassenprogrammierung lösen. Schau dir dazu mal das Beispiel UserForm CommandButton auf meiner HP, Seite Beispiele m. VBA an, vielleicht hilft es dir als Anregung weiter.

 

Hi,

clsButton ist der Name der Klasse (des Klassenmoduls), in welche die Schalter-Objekte CommandButton aufgenommen werden. Im Klassenmodul ist festgelegt, dass die Objekte CommandButton heißen und vom Objekttyp MSForms.CommandButton sind. clsButton und CommandButton sind frei wählbare Bezeichungen, nur sollte der Name der Übersichtlichkeit halber etwas mit dem Objekt, welches sie rerpäsentieren, zu tun haben. Bei Klassenmodulen hat sich eingebürgert, dass man den Präfix cls voransetzt. Du kannst die Klasse (und somit das Klassenmodul) also z.B. clsOptionsfelder nennen und im Klassenmodul definierst du dann z.B.
Code:

wobei MS.Forms.OptionButton der Objekttyp ist.

Da im verlinkten Beispiel das in die Klasse geschriebene Objekt CommandButton heißt, ergibt sich im Klassenmodul der Prozedurname Private Sub CommandButton_Click(). Das erkennst du, wenn du im Codefenster oben links auf das Auswahlmenü gehst - da wird dir angeboten Class und CommandButton und rechts, unter Deklarationen, werden die verfügbaren Ereignisse dazu angeboten.

Das Array aCommand() repäsentiert sozusagen den "Container" der Klasse, in den die CommandButton-Objekte aufgenommen werden - auf diese Weise sind sie dann im Klassenmodul ansprechbar. Das ist nichts anderes als wenn du im Codemodul (oder auch Klassenmodul genannt) des Tabellenblattes mit Target auf eine Zelle zugreifst.

 

Cool Danke,

ich werde es Montag auf der Arbeit mal probieren. Bin gespannt ob ich es so hinbekomme, wie ich es gerne hätte.

Du hast mir aber schonm al sehr weiter geholfen.

Gruß

Bongartz120