¿Cómo convertir valores VERDADERO/FALSO en casillas de verificación en Excel?

Supongamos que ha introducido números en dos columnas: si el valor de la primera columna es mayor que el de la segunda, se muestra TRUE; de lo contrario, aparece FALSE, tal como se muestra en la siguiente captura de pantalla. Ahora puede ajustar la fórmula para transformar fácilmente esos valores TRUE o FALSE en casillas marcables en Excel.

Cambie la fórmula original por =IF(original_formula,«þ»,«¨»)

1. En este caso, uso la fórmula =B3>C3 para comparar los números de ambas columnas. Por tanto, modificaré la fórmula original como se muestra a continuación y arrastraré el controlador de autorrelleno al resto de las celdas.

=IF(B3>C3,«þ»,«¨»)

2. Mantenga seleccionadas las celdas con fórmulas, haga clic con el botón derecho y seleccione Establecer formato de celda en el menú contextual.

3. En el cuadro de diálogo Establecer formato de celda, vaya a la pestaña Fuente, seleccione Wingdings en el cuadro de lista Fuente y haga clic en el botón Aceptar.

Ahora verá que los caracteres especiales se han transformado en casillas marcadas y sin marcar. Consulte la siguiente captura de pantalla:

Esta sección presenta una macro de VBA que convierte varios valores VERDADERO y FALSO en controles de casilla en Excel. Siga estos pasos:

1. Seleccione las celdas que contienen los valores «TRUE» y «FALSE» y que desea convertir en casillas de verificación.

2. Pulse simultáneamente las teclas Alt + F11 para abrir la ventana de Microsoft Visual Basic para Aplicaciones.

3. Haga clic en Insertar > Módulo y pegue el siguiente código VBA en la nueva ventana del módulo.

VBA: Convertir TRUE y FALSE en controles de casilla en Excel

Sub ConvertTrueFalseToCheckbox()
Dim xCB As CheckBox
Dim xRg, xCell As Range
Application.ScreenUpdating = False
On Error Resume Next
Set xRg = Selection
For Each xCB In ActiveSheet.CheckBoxes
xCB.Delete
Next
For Each xCell In xRg
If (UCase(xCell.Value) = "TRUE") Or (UCase(xCell.Value) = "FALSE") Then
Set xCB = ActiveSheet.CheckBoxes.Add(xCell.Left, xCell.Top, cDblCheckboxWidth, xCell.Height)
xCB.Value = xCell.Value
xCB.LinkedCell = xCell.Address
xCB.Text = ""
End If
Next
Application.ScreenUpdating = True
End Sub

4. Pulse la tecla F5 o haga clic en el botón Ejecutar para ejecutar este código VBA.

A continuación, observará que todos los valores TRUE y FALSE seleccionados se han transformado en controles de casilla: TRUE aparece como una casilla marcada y FALSE como una casilla sin marcar. Consulte la siguiente captura de pantalla:

Si tiene instalado Kutools para Excel, puede utilizar su función Inserción masiva de casilla de verificación para insertar múltiples controles de casilla de forma masiva con un solo clic en Excel.

Kutools para Excel: incluye más de 300 herramientas prácticas para Excel. ¡Prueba gratuita completa durante 60 días, sin necesidad de tarjeta de crédito!Obtener ahora

1. Seleccione las celdas con los valores «TRUE» y «FALSE» que desea convertir en casillas de verificación y haga clic en Kutools > Insertar > Inserción masiva de casillas de verificación.

2. Ahora se insertará un control de casilla en cada celda seleccionada. Puede marcar estas casillas manualmente según lo necesite.