Reiniciar varios checkbox

[erbuson]

Hola:

Independientemente de tu pregunta, que no se me ocurre ni por lo mas remoto lo que pueda hacer tu código, puedes hacerlo si quieres tenerlos de este modo, tal vez te basta una sola linea para cada uno de ellos haciéndolo mas legible.
De este modo

Check13.Value = 1
If Check13.Value = 1 Then Check1.Enabled = False
If Check1.Enabled = False Then Check2.Enabled = False
If Check2.Enabled = False Then Check4.Enabled = False
If Check4.Enabled = False Then Check5.Enabled = False
If Check5.Enabled = False Then Check6.Enabled = False
If Check6.Enabled = False Then Check7.Enabled = False
If Check7.Enabled = False Then Check8.Enabled = False
If Check8.Enabled = False Then Check9.Enabled = False
If Check9.Enabled = False Then Check10.Enabled = False
If Check10.Enabled = False Then Check11.Enabled = False
If Check11.Enabled = False Then Check12.Enabled = False
If Check13.Value = 1 Then Text7.Enabled = True

Sin embargo tal como está este código no tiene mucho sentido que compruebes el valor de Check13 cuando tu lo estás forzando en la primera linea.

Entones si fuerzas el Check13 a 1 el código no tendría porqué tener ninguna comparación puesto que ya sabes de antemano que cada una de ellas es cierta.

Por otra parte veo que no tienes el CheckBox3

Respecto a una función que los inhabilite o habilite a todos pkj te la da en su comentario.

Tal vez si comentaras lo que pretendes hacer te podríamos encaminar hacia una solución mas adecuada.

Saluldos