HERBERS Excel-Forum - das Archiv
Bewerten Sie hier bitte das Excel-Portal

Thema: In USF aktiven OPTButton löschen | Herbers Excel-Forum

In USF aktiven OPTButton löschen
reinhardt

Hallo,
ich habe eine Userform mit Optionbuttons, wo ich etwas anwähle, und später auch noch Text in die Tabelle eintrage.
Die Buttons laden sich über
Worksheets("Inhalt").Select
OptButton_Tabelle1.Caption = Worksheets("Daten").Range("a5")
OptButton_Tabelle2.Caption = Worksheets("Daten").Range("a6")
Übertragen wird mit
Cells(MyRow, 1).Value = Me.TextBox1.Text
Cells(MyRow, 2).Value = Me.ComboBox1.Text
Die Textboxen gelöscht über
Me.TextBox1.Text = ""
Me.ComboBox1.Text = ""
Frage: Wie lösche ich nach einem Durchlauf den noch aktivierten Optionbutton in der Userform?
Gruß Reinhardt

AW: In USF aktiven OPTButton löschen
Nepumuk

Hallo Reinhart,
so:
Dim objControl As Control
For Each objControl In Controls
    If TypeOf objControl Is MSForms.OptionButton Then objControl.Value = False
Next

Gruß
Nepumuk