Reiniciar varios checkbox

[pkj]

Creo que para lo que quieres tienes que poner esto:

Código vb:

Private Sub Check13_Click()
  Dim F As Integer
  If Check13.Value=1 Then
    For F=1 to 12
      Controls("Check" & F).Enabled=False
    Next F 
    Text7.Enabled = True
  Else
    For F=1 to 12
      Controls("Check" & F).Enabled=True
    Next F 
    Text7.Enabled = False
  End If
End Sub