Borrar datos de un combobox

Tengo una hoja excel con 10 combobox activeX donde se elige en cada uno un producto de una determinada lista. Me gustaría que cuando decidiese pudiera ejecutar una macro y dejar el contenido de todos los combos en blanco para volver a elegir nuevos productos, ¿es posible?

1

1 Respuesta

3.686.650 pts. Si me amas, siempre voy a estar en tu corazón; si me...

H o l a:

Si conoces el nombre de cada combo, lo puedes hacer así:

Sub BlanquearCombos()
'Por.Dante Amor
    ActiveSheet.ComboBox1 = ""
    ActiveSheet.ComboBox2 = ""
    ActiveSheet.ComboBox3 = ""
    ActiveSheet.ComboBox4 = ""
    ActiveSheet.ComboBox5 = ""
    ActiveSheet.ComboBox6 = ""
    ActiveSheet.ComboBox7 = ""
    ActiveSheet.ComboBox8 = ""
    ActiveSheet.ComboBox9 = ""
    ActiveSheet.ComboBox10 = ""
End Sub

Si no conoces los nombres y quieres limpiar todos los combos:

Sub LimpiarCombos()
'Por.Dante Amor
    For Each oleobj In ActiveSheet.OLEObjects
        If TypeOf oleobj.Object Is MSForms.ComboBox Then
            oleobj.Object.Value = ""
        End If
    Next
End Sub

' : )
'S aludos. Dante Amor. Recuerda valorar la respuesta. G racias
' : )

¡Gracias! Enormes gracias.

Funciona perfectamente he utilizado la opción de "LimpiarCombos".

Te estoy muy agradecido. Un saludo

Añade tu respuesta

Haz clic para o

Más respuestas relacionadas