Hallo zusammen,

ich habe mir eine Userform erstellt, auf der ich mehrere Auswahlbereiche mit Option Buttons erstellt habe. Nachdem ich festgestellt hatte, dass immer nur eine ausgewählt werden kann, wenn die sich in einem Frame befinden, habe ich sie gruppiert. Das kann man in dem Bild sehen. Jetzt habe ich damit aber noch keine Erfahrung und noch nichts passendes gefunden. Ich möchte zum Einen vor der eigentlichen Weiterbearbeitung prüfen, ob der User in allen Reihen eine Eintragung gemacht hat. Dazu habe ich folgenden Code verfasst.

prüfung = False
For Each OB In Me.Controls
i = 1
If OB.Name = "OB" & i & "Geldersparnis" Then
If OB.Value = True Then
prüfung = True
Exit For
End If
End If
i = i + 1
Next OB
If prüfung = False Then
MsgBox ("Sie haben noch keine Bewertung der Geldersparnis vorgenommen.")
Exit Sub
End If

Das funktioniert aber leider nicht. Wenn die 1 angewählt ist, geht er weiter und sobald eine andere Zahl angewählt ist, sagt er, dass der User vergessen hat eine Eingabe zu tätigen. Ist bestimmt wieder nur was kleines verkehrt, aber ich würde mich freuen, wenn es jemadn heraus findet.
Ich würde dann im nächsten Schritt mit fast dem gleichen Code den Wert auslesen. Das wird dann aber wahrscheinlich aktuell auch noch nicht funktionieren.

Ich danke euch schon einmal für eure Hilfe.