Skip to main content

¿Cómo borrar el contenido de un cuadro combinado con código VBA en Excel?

Author: Siluvia Last Modified: 2025-06-04

Normalmente, puedes borrar el contenido de un cuadro combinado limpiando los datos de la lista del Rango de entrada. Pero, ¿qué pasa si deseas borrar el contenido de todos los cuadros combinados en una hoja de cálculo de Excel? Este artículo proporciona dos códigos VBA para ayudarte no solo a borrar el contenido de un cuadro combinado, sino también a borrar el contenido de todos los cuadros combinados al mismo tiempo en una hoja de cálculo de Excel.

Borrar fácilmente el contenido de un cuadro combinado con código VBA


Borrar fácilmente el contenido de un cuadro combinado con código VBA

Los siguientes dos códigos VBA pueden ayudarte a borrar el contenido de un cuadro combinado o de todos los cuadros combinados en la hoja de cálculo activa. Por favor, sigue los pasos a continuación.

1. En la hoja de cálculo donde necesitas borrar el contenido de un cuadro combinado, presiona las teclas Alt + F11 al mismo tiempo para abrir la ventana de Microsoft Visual Basic para Aplicaciones.

2. En la ventana de Microsoft Visual Basic para Aplicaciones, haz clic en Insertar > Módulo. Luego copia el siguiente código VBA en la ventana de Código.

VBA 1: Borrar el contenido de un cuadro combinado en la hoja de cálculo

Sub ClearAComboBox()
ActiveSheet.Shapes.Range(Array("Drop Down 2")).Select
With Selection
    .ListFillRange = ""
End With
End Sub

Nota: En el código, “Drop Down 2” es el nombre del cuadro combinado del que borrarás el contenido. Por favor, cámbialo por el tuyo propio.

VBA 2: Borrar el contenido de todos los cuadros combinados en la hoja de cálculo activa

Sub ClearComboBox()
    Dim xOle As OLEObject
    Dim xDrop As DropDown
    Application.ScreenUpdating = False
    For Each xOle In ActiveSheet.OLEObjects
        If TypeName(xOle.Object) = "ComboBox" Then
            xOle.ListFillRange = ""
        End If
    Next
    For Each xDrop In ActiveSheet.DropDowns
        xDrop.ListFillRange = ""
    Next
    Application.ScreenUpdating = True
End Sub

3. Presiona la tecla F5 o haz clic en el botón Ejecutar para ejecutar el código.

Luego podrás ver que el contenido se ha borrado en el cuadro combinado especificado o en todos los cuadros combinados de la hoja de cálculo activa, como se muestra en la siguiente captura de pantalla:

run vba code to clear contents in the specified combo box

Nota: Los códigos VBA se pueden aplicar tanto al Cuadro combinado (Control de formulario) como al Cuadro combinado (Control ActiveX).

a screenshot of kutools for excel ai

Descubre la Magia de Excel con Kutools AI

  • Ejecución Inteligente: Realiza operaciones en celdas, analiza datos y crea gráficos, todo impulsado por comandos simples.
  • Fórmulas Personalizadas: Genera fórmulas adaptadas para optimizar tus flujos de trabajo.
  • Codificación VBA: Escribe e implementa código VBA sin esfuerzo.
  • Interpretación de Fórmulas: Comprende fórmulas complejas con facilidad.
  • Traducción de Texto: Supera las barreras del idioma dentro de tus hojas de cálculo.
Potencia tus capacidades de Excel con herramientas impulsadas por IA. ¡Descarga Ahora y experimenta una eficiencia como nunca antes!

Artículos relacionados:

Las mejores herramientas de productividad para Office

🤖 Kutools AI Aide: Revoluciona el análisis de datos basado en: Ejecución inteligente | Generar código | Crear fórmulas personalizadas | Analizar datos y generar gráficos | Invocar Funciones mejoradas
Funciones populares: Buscar, resaltar o marcar duplicados | Eliminar filas en blanco | Combinar columnas o celdas sin perder datos | Redondear...
Super BUSCARV: Búsqueda por varios criterios | Búsqueda de varios valores | Búsqueda en varias hojas | Coincidencia difusa....
Lista desplegable avanzada: Crea rápidamente una lista desplegable | Lista desplegable dependiente | Lista desplegable de selección múltiple....
Administrador de columnas: Agregar un número específico de columnas | Mover columnas | Alternar el estado de visibilidad de columnas ocultas | Comparar rangos y columnas...
Funciones destacadas: Cuadrícula de enfoque | Vista de diseño | Barra de fórmulas mejorada | Administrador de Libro de trabajo y Hoja de cálculo | Biblioteca de AutoTexto | Selector de fechas | Combinar Datos | Cifrar/Descifrar celdas | Enviar correo electrónico por lista | Super Filtro | Filtro especial (filtrar celdas con fuente en negrita/cursiva/tachado...)...
Top15 conjuntos de herramientas:12 herramientas de texto (Agregar texto, Eliminar caracteres específicos, ...) | Más de50 tipos de gráficos (Diagrama de Gantt, ...) | Más de40 fórmulas prácticas (Calcular edad basada en la fecha de nacimiento, ...) |19 herramientas de inserción (Insertar código QR, Insertar imagen desde ruta, ...) |12 herramientas de conversión (Convertir a palabras, Conversión de moneda, ...) |7 herramientas para combinar y dividir (Combinar filas avanzado, Dividir celdas, ...) | ... y más

Potencia tus habilidades en Excel con Kutools para Excel y experimenta una eficiencia sin precedentes. Kutools para Excel ofrece más de300 funciones avanzadas para aumentar la productividad y ahorrar tiempo. Haz clic aquí para obtener la función que más necesitas...


Office Tab lleva la interfaz de pestañas a Office y facilita mucho tu trabajo

  • Habilita la edición y lectura con pestañas en Word, Excel, PowerPoint, Publisher, Access, Visio y Project.
  • Abre y crea varios documentos en nuevas pestañas de la misma ventana, en lugar de nuevas ventanas.
  • ¡Aumenta tu productividad en un50% y reduce cientos de clics de ratón cada día!