Hallo,
in einer Anwendung habe ich eine UserForm mit 2 CheckBoxen.
Im Standardmodul möchte ich nun prüfen, welche der beiden Checkboxen aktiviert sind.
Habe dabei das Problem, die Checkboxen anzusprechen.
Die UserForm wurde im Modul vom Typ "Object" definiert.
In der Zeile "If frm.Controls ... " bekomme ich den Hinweis: "Objekt unterstützt diese Eigenschaft oder Methode nicht".
Deklariere ich die Variable frm als Form, kriege ich bei der Anweisung "Set frm ..." den Fehlerhinweis, dass die Typen unverträglich sind.
Kann mir jemand mit einem Tipp weiterhelfen?
Hier ein Schnipsel (der Name der UserForm wird an das Standardmodul übergeben = strForm):
Sub Meine Prozedur(strForm as String)
Dim frm as Object
Set frm = ThisWorkbook.VBProject.VBComponents(strForm)
If frm.Controls("CheckBox1").Value = 1 then
MsgBox "CheckBox 1 ist aktiviert."
End If
Wäre für jeden Hinweis dankbar.
Gruß
Jürgen