Tengo 3 casillas de verificación. Cuando un usuario abre mi hoja, no debe marcar las casillas de verificación. Quiero que estén deshabilitados. ¿Cómo puedo hacer eso?
Respuestas
1 para la respuesta № 1No estoy seguro de si te referías a ActiveX o FormControl, así que aquí tienes.
Código
Private Sub Worksheet_Activate()
Dim myActiveX As Object
Set myActiveX = Sheet1.OLEObjects("CheckBox1")
myActiveX.Object.Value = True
myActiveX.Object.Locked = False " Make it False if you wish to enable it
myActiveX.Object.Enabled = False " Another option to disable
Dim myFormControl As CheckBox
Set myFormControl = ActiveSheet.Shapes("Check Box 1").OLEFormat.Object
myFormControl.Value = True
myFormControl.Enabled = False " Make it True if you wish to enable it
End Sub
0 para la respuesta № 2
Tienes que escribir algún código VBA para hacer eso.
Supongamos que tiene 3 CheckBoxes en su primera hoja.
Al mantener presionada la tecla "Alt" en su teclado y presionar una vez la tecla "F11", se abre Microsoft Visual Basic. (Alt + F11)
En su mano izquierda puede ver el árbol "VBAProject".
Haga doble clic en el archivo "ThisWorkbook" y copie el siguiente código en la ventana que aparecerá:
Private Sub Workbook_Open()
void = uncheckAllCheckboxes()
End Sub
Function uncheckAllCheckboxes()
ThisWorkbook.Worksheets(1).CheckBox1.Value = False
ThisWorkbook.Worksheets(1).CheckBox2.Value = False
ThisWorkbook.Worksheets(1).CheckBox3.Value = False
End Function
Guarde el archivo de Excel como tipo "Libro de Excel 97-2003" (.xls)
Cierra tu excel.
Abra el archivo que ha guardado previamente y todo funcionará bien.
;)
P.S .: Es importante habilitar las macros desde la configuración de Excel