¿Cómo agregar símbolos de tick y cross en la lista desplegable en Excel?
Normalmente, después de insertar símbolos de tick y cross en celdas con función de símbolo y luego crear listas desplegables con ellos como fuente de datos, los resultados se mostrarán como ü o û en celdas desplegables. Cómo mostrar la ✓ y la símbolos en las celdas después de seleccionar elementos de la lista desplegable? El siguiente método de VBA ayudará a crear una lista desplegable de marcas y cruces en Excel.
Agregue tick y cross símbolos en la lista desplegable con el código VBA
Agregue tick y cross símbolos en la lista desplegable con el código VBA
Con el siguiente código de VBA, puede insertar listas desplegables de marcas y cruces en celdas especificadas en Excel. Haz lo siguiente.
1. En la hoja de trabajo, creará listas desplegables de símbolos de marca y cruz, haga clic con el botón derecho en la pestaña de la hoja y seleccione Ver código desde el menú contextual.
2. Entonces el Microsoft Visual Basic para aplicaciones Se abre la ventana, copie el código VBA a continuación en la ventana Código.
Código de VBA 1: agregue ticks y símbolos cruzados en la lista desplegable
Private Sub Worksheet_Change(ByVal Target As Range)
'Update by Extendoffice 20180703
If Intersect(Target, Range("B1:B10")) Is Nothing Then Exit Sub
If Target.Value = "Tick" Then
Target.Value = "P"
ElseIf Target.Value = "Cross" Then
Target.Value = "S"
End If
End Sub
3. Continúe haciendo clic recuadro > Módulo, luego copie el siguiente código 2 en la ventana del Módulo.
Código de VBA 2: agregue ticks y símbolos cruzados en la lista desplegable
Sub usingSymbols()
'Update by Extendoffice 20180703
Dim xRg As Range
Set xRg = Range("B1:B10")
xRg.Font.Name = "Wingdings 2"
xRg.Validation.Add xlValidateList, , , "Tick,Cross"
End Sub
Note: En el código anterior, B1: B10 es el rango de celdas que creará en la lista desplegable de marcas y cruces. Cambie el rango según lo necesite.
4. presione el F5 clave para ejecutar el código.
Ahora, las listas desplegables de símbolos de marca y cruz se insertan en el rango B1: B10. Seleccione Tick del menú desplegable para insertar ✓ en la celda, y seleccione Cross se mostrará símbolo. Ver captura de pantalla:
Artículos relacionados:
- ¿Cómo rellenar automáticamente otras celdas al seleccionar valores en la lista desplegable de Excel?
- ¿Cómo autocompletar al escribir en la lista desplegable de Excel?
- ¿Cómo crear un calendario de lista desplegable en Excel?
- ¿Cómo crear una lista desplegable con múltiples selecciones o valores en Excel?
Las mejores herramientas de productividad de oficina
Mejore sus habilidades de Excel con Kutools for Excel y experimente la eficiencia como nunca antes. Kutools for Excel ofrece más de 300 funciones avanzadas para aumentar la productividad y ahorrar tiempo. Haga clic aquí para obtener la función que más necesita...
Office Tab lleva la interfaz con pestañas a Office y hace que su trabajo sea mucho más fácil
- Habilite la edición y lectura con pestañas en Word, Excel, PowerPoint, Publisher, Access, Visio y Project.
- Abra y cree varios documentos en nuevas pestañas de la misma ventana, en lugar de en nuevas ventanas.
- ¡Aumenta su productividad en un 50% y reduce cientos de clics del mouse todos los días!