Thread: Togglebutton to change Checkboxes
View Single Post
  #1   Report Post  
Posted to microsoft.public.excel.programming
Greg Wilson Greg Wilson is offline
external usenet poster
  
Posts: 747
Default Togglebutton to change Checkboxes
I suggest a loop instead:

Private Sub ToggleButton1_Click()
Dim i As Integer
For i = 1 To 17
Me.Controls("CheckBox" & i).Value = ToggleButton1.Value
Next
End Sub
Reply With QuoteReply With Quote