Optionbutton
06.08.2003 10:27:39
Optionbuttons mit Variable ansprechen
Ich hab folgendes Problem. Ich habe 200 (!!!) Optionbuttons in einer Excel Tabelle und jeweils drei davon müssen einer Gruppe zugeordnet werden.
Folglich:
Private Sub Commandbutton1_Click()
Dim i As Integer
Dim counter as Integer
Dim Name as String
counter = 1
For 1 = 0 To 200
Name = "Gruppe" + CStr(i)
Optionbutton(counter).groupname = Name
Optionbutton(counter+1).groupname = Name
Optionbutton(counter+2).Groupname = Name
Counter = counter + 3
Next
End Sub
Problem: das mit dem Optionbutton(counter) geht nicht.
Ich fand von Ende 2000 das hier:
For i = 1 To 10
UserForm1.Controls("TextBox" & CStr(i)).Value = "?"
Next i
Mein Excel kennt jedoch kein Userform und kein Controls. Ausserdem hab ich Optionsbuttons und kein Textfeld.
Ich habe keine Lust 600 Zeilen zu schreiben, in der ich jeweils die Gruppenname angebe für jeden Button.
Bitte helf mir.
Patrick Haupt