Neues UserForm öffnen
19.08.2005 13:46:18
Powolny
hab folgendes Problem:
Ich hab verschiedene OptionButton´s und möchte, je nachdem welcher aktiv ist, ein bestimmtes UserForm öffnen. Nur macht er mir das nicht. Wenn ich das ausführe kommt die Fehlermeldung:
"Typen unverträglich".
Hab hier mal den Code.
Private Sub CommandButton1_Click()
If OptionButton1(True) Is Nothing Then
UserForm2.Show
ElseIf OptionButton2(True) Is Nothing Then
UserForm3.Show
ElseIf OptionButton3(True) Is Nothing Then
UserForm4.Show
ElseIf OptionButton4(True) Is Nothing Then
UserForm5.Show
ElseIf OptionButton5(True) Is Nothing Then
UserForm6.Show
End If
End Sub
Danke schon mal für Eure Antworten.
Gruß ich
Anzeige