Hi group,

WinXP Pro
Office 2003

I have created a userform with a frame and 22 optionbuttons. I have
made all optionbuttons hidden (visible=false). What I need to do is
when the form is shown to use a range's value as the caption for the
optionbuttons and to also make them visible. Not all buttons will
always be required, that is why I made them hidden when designing.

I have tried several different loops without success. Any help would be
greatly appreciated.

The buttons are named "PlayerOptBut1,
PlayerOptBut2.......PlayerOptBut22"

Here is my last attempt:

rr = Sheets("RND1").Range("A65536").End(xlUp).Row

For i = 2 To rr
ButtonCaption = Sheets("RND1").Range("D" & i).Value & ". " & _
Sheets("RND1").Range("C" & i).Value & " " & _
Sheets("RND1").Range("B" & i).Value

MatchDayForm.TeamListFrame.PlayerOptBut(i).Caption =
ButtonCaption
MatchDayForm.TeamListFrame.PlayerOptBut(i).Visible = True
Next i

Regards

Rob