Variable aus UserForm übergeben (public)
29.01.2019 14:58:22
Steve
es macht mich gerade echt fuchsig, dass die Auswahl von Checkboxen von einer Userform nicht ins Modul übergeben kann.
Hintergrund:
Ich rufe in einem Modul eine Userform auf.
In der Userform gibt es 2 CheckBox´n. Ob die Checkboxen angehakt sind oder nicht (True or false) möchte ich gerne ins Modul übergeben.
Dies würde ich gerne mit Public variablen realisieren, was mir einfach nicht gelingt... Die Variablen (Wert1 und Wert2) sind dauerhaft auf "Falsch"
Code: (stark gekürzt)
Public Wert1 As Boolean
Public Wert2 As Boolean
Sub Nachtragen_Ändern()
'Variablen Deklaration
...
UserForm_Ä_N.Show
If Wert1 = True & Wert2 = True Then 'Plausibilitätschecks
MsgBox "Auswahl von Ändern und Anlegen nicht gleichzeitig möglich!"
Exit Sub
Else 'nichts
End If
End Sub
Private Sub OK_Click()
Check1.Value = Wert1
Check2.Value = Wert2
Unload UserForm_Ä_N
End Sub
Private Sub UserForm_Initialize()
Check1.Value = False
Check2.Value = False
End Sub
Steve