View Single Post
  #1   Report Post  
Posted to microsoft.public.excel.programming
V. Roe V. Roe is offline
external usenet poster
 
Posts: 17
Default Nested For Each Statement

I am attempting to loop through a list of intials on a hidden sheet and
assign each set of initials as a caption to an optionbutton in a group of
optionbuttons on a userform. I cannot get the loop sequence correct. I
have tried several variations of the code below, but I cannot get it to
change to the next optionbutton. Any help would be greatly appreciated. I
am using excel 97.

For i = 10 To 30
For Each icell In Range("InitialList")
If Not IsEmpty(icell) Then
BillTrackingForm.Controls("OptionButton" & i).Caption = icell.Text
BillTrackingForm.Controls("OptionButton" & i).Enabled = True
End If
Next icell
Next i