¿Cómo seleccionar varios elementos de la lista desplegable en una celda en Excel?

La lista desplegable se utiliza con frecuencia en el trabajo diario de Excel. De forma predeterminada, solo se puede seleccionar un elemento en una lista desplegable. Pero en algunas ocasiones, es posible que deba seleccionar varios elementos de la lista desplegable en una sola celda, como se muestra a continuación. ¿Cómo se puede manejar en Excel?

Seleccione varios elementos de la lista desplegable en una celda con VBA

Seleccione varios elementos de la lista desplegable en una celda con la práctica opción de Kutools para Excel

Seleccione varios elementos de la lista desplegable en una celda con VBA

Aquí hay algunos VBA que pueden hacerle un favor al resolver este trabajo.

Seleccione elementos duplicados de la lista desplegable en una celda

1. Después de crear una lista desplegable, haga clic derecho en la pestaña de la hoja para seleccionar Ver código desde el menú contextual.

2. Luego, en el Microsoft Visual Basic para aplicaciones ventana, copie y pegue el código siguiente en el script en blanco.

VBA: seleccione varios elementos de la lista desplegable en una celda

Private Sub Worksheet_Change(ByVal Target As Range)
'UpdatebyExtendoffice20221111
    Dim xRgVal As Range
    Dim xStrNew As String
    On Error Resume Next
    Set xRgVal = Cells.SpecialCells(xlCellTypeAllValidation)
    If (Target.Count > 1) Or (xRgVal Is Nothing) Then Exit Sub
    If Intersect(Target, xRgVal) Is Nothing Then Exit Sub
    If Target.Value = "" Then Exit Sub
    Application.EnableEvents = False
    xStrNew = Target.Value
    Application.Undo
    If xStrNew = Target.Value Then
    Else
    xStrNew = xStrNew & " " & Target.Value
    Target.Value = xStrNew
    End If
    Application.EnableEvents = True
End Sub

3. Guarde el código y cierre la ventana para volver a la lista desplegable. Ahora puede seleccionar varios elementos de la lista desplegable.

Nota:

1. Con el VBA, separa los elementos por espacio, puede cambiar xStrNew = xStrNew & "" & Valor objetivo a otros para cambiar el delimitador según sea necesario. Por ejemplo, xStrNew = xStrNew & "," & Valor objetivo separará los elementos con comas.

2. Este código VBA funciona para todas las listas desplegables de la hoja.

Seleccione varios elementos de la lista desplegable a una celda sin repetir

Si solo desea seleccionar elementos únicos de la lista desplegable en una celda, puede repetir los pasos anteriores y usar el código siguiente.

VBA: seleccione varios elementos de la lista desplegable a una celda sin repetir

Private Sub Worksheet_Change(ByVal Target As Range)
'UpdatebyExtendoffice20221111
    Dim I As Integer
    Dim xRgVal As Range
    Dim xStrNew As String
    Dim xStrOld As String
    Dim xFlag As Boolean
    Dim xArr
    On Error Resume Next
    Set xRgVal = Cells.SpecialCells(xlCellTypeAllValidation)
    If (Target.Count > 1) Or (xRgVal Is Nothing) Then Exit Sub
    If Intersect(Target, xRgVal) Is Nothing Then Exit Sub
    If Target.Value = "" Then Exit Sub
    Application.EnableEvents = False
    xFlag = True
    xStrNew = " " & Target.Value & " "
    Application.Undo
    xStrOld = Target.Value
    If InStr(1, xStrOld, xStrNew) = 0 Then
        xStrNew = xStrNew & xStrOld & " "
    Else
        xStrNew = xStrOld
    End If
    Target.Value = xStrNew
    Application.EnableEvents = True
End Sub

Los dos códigos VBA anteriores no admiten la eliminación de partes del contenido de la celda, solo admiten la eliminación de todos los elementos de la celda.

Seleccione varios elementos de la lista desplegable en una celda con la práctica opción de Kutools para Excel

Si no está familiarizado con el código VBA, puede instalación gratuita una herramienta útil - Kutools for Excel, que contiene un grupo de utilidades sobre la lista desplegable, y hay una opción Lista desplegable de selección múltiple puede ayudarlo a seleccionar fácilmente varios elementos de la lista desplegable en una celda.

Después de crear la lista desplegable, seleccione las celdas de la lista desplegable y haga clic en Kutools > La lista desplegable > Lista desplegable de selección múltiple para habilitar esta utilidad.

Luego, las celdas de la lista desplegable seleccionada se pueden seleccionar con varios elementos en la celda.

Si usa esta opción por primera vez, puede especificar la configuración de esta utilidad que necesite antes de aplicar esta utilidad.

Presione Kutools > La lista desplegable > la flecha al lado Lista desplegable de selección múltiple > Ajustes.

Entonces en el Configuración de lista desplegable de selección múltiple diálogo, puedes

1) Especifique el alcance de aplicación que necesite;

2) Especifique la dirección del lugar de los artículos;

3) Especifique el separador entre elementos;

4) Especifique si no agrega duplicados y elimina elementos duplicados.

Presione Ok y haga clic Kutools > La lista desplegable > Lista desplegable de selección múltiple para que surta efecto.

Consejo: Para aplicar el Lista desplegable de selección múltiple utilidad, necesitas instalar al principio. Si desea crear una lista desplegable con varios niveles, la utilidad a continuación puede ayudarlo.

Cree fácilmente una lista desplegable dinámica dependiente de dos niveles o varios niveles en Excel

En Excel, crear una lista desplegable de dos o varios niveles es complejo. Aquí el Lista desplegable dinámica utilidad de Kutools for Excel puedo hacerte un favor. Lo único que debe hacer es ordenar los datos como se muestra en el ejemplo, luego seleccionar el rango de datos y el rango de salida, luego dejarlo en manos de la utilidad.  Haga clic para 30 días de prueba gratis!

Kutools for Excel: con más de 300 prácticos complementos de Excel, gratis para probar sin limitación en 30 día.

---

Las mejores herramientas de productividad de oficina

Kutools para Excel resuelve la mayoría de sus problemas y aumenta su productividad en un 80%

• Reutilizar: Inserte rápidamente fórmulas complejas, gráficos y cualquier cosa que hayas usado antes; Cifrar celdas con contraseña; Crear lista de distribución y enviar correos electrónicos ...
• Barra de súper fórmula (edite fácilmente varias líneas de texto y fórmulas); Diseño de lectura (leer y editar fácilmente un gran número de celdas); Pegar en rango filtrado...
• Combinar celdas / filas / columnas sin perder datos; Contenido de celdas divididas; Combinar filas / columnas duplicadas... Prevenir celdas duplicadas; Comparar rangos...
• Seleccione Duplicado o Único Filas; Seleccionar filas en blanco (todas las celdas están vacías); Super Find y Fuzzy Find en muchos libros de trabajo; Selección aleatoria ...
• Copia exacta Varias celdas sin cambiar la referencia de la fórmula; Crear referencias automáticamente a varias hojas; Insertar viñetas, Casillas de verificación y más ...
• Extraer texto, Agregar texto, Eliminar por posición, Quitar espacio; Crear e imprimir subtotales de paginación; Convertir entre contenido de celdas y comentarios...
• Súper filtro (guardar y aplicar esquemas de filtros a otras hojas); Orden avanzado por mes / semana / día, frecuencia y más; Filtro especial en negrita, cursiva ...
• Combinar libros y hojas de trabajo; Combinar tablas basadas en columnas clave; Dividir datos en varias hojas; Conversión por lotes de xls, xlsx y PDF...
• Más de 300 potentes funciones. Compatible con Office/Excel 2007-2021 y 365. Compatible con todos los idiomas. Fácil implementación en su empresa u organización. Funciones completas Prueba gratuita de 30 días. Garantía de devolución de dinero de 60 días.

Leer más ... Descarga gratis... Compra... 

---

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!

Leer más ... Descarga gratis... Compra...