Destildar todas las casillas de verificación de una vez
Tengo una planilla de Excel en la que he incluido casillas de verificación, que a partir de tildarlas activa el cálculo de un costo.
Quisiera poder limpiar el registro sin tener que ir destildando una a una cada casilla. ¿Es posible?
2 Respuestas
Respuesta de Carlos Arrocha
1
[Hola Ximena.
'Si son controles ActiveX, utiliza el siguiente código Sub Check1() Dim c As Object For Each c In ActiveSheet.OLEObjects If InStr(1, c.Name, "CheckBox") > 0 Then c.Object.Value = False End If Next End Sub
'Si son controles de formulario, utiliza el siguiente código Sub Check2() Dim chkBox As Excel.CheckBox Application.ScreenUpdating = False For Each chkBox In ActiveSheet.CheckBoxes chkBox.Value = xlOff Next chkBox Application.ScreenUpdating = True End Sub
Salu2 Carlos Arrocha
Respuesta de Elsa Matilde
1
Parece que llegué tarde, veo que ya te han respondido y muy bien. Será en una próxima oportunidad.
PD) Como el tema son los checkbox te invito a ver el video 14 de mi canal (simular un checkbox)