Es müssen 21 Optionsfelder gefüllt werden.
OptButton1.Caption = ThisWorkbook.Sheets(2).Cells(2,2).Text
OptButton2.Caption = ThisWorkbook.Sheets(2).Cells(2,3).Text
OptButton3.Caption = ThisWorkbook.Sheets(2).Cells(2,4).Text
u.s.w.
OptButton1 bis OptButton6 stehen in Frame1, die übrigen in Frame2.
For y = 1 To 21
OptButton(y).Caption = ThisWorkbook.Sheets(2).Cells(2,y+1).Text
Next
.. geht nicht.
Was mache ich falsch???
Für Hilfe wäre ich sehr dankbar
Franz X.