Como limpar o conteúdo da caixa de combinação com o código VBA no Excel?

Normalmente, você pode limpar o conteúdo de uma caixa de combinação limpando os dados da lista Intervalo de entrada. Mas que tal limpar o conteúdo de todas as caixas de combinação em uma planilha do Excel? Este artigo prepara dois códigos VBA para ajudá-lo não apenas a limpar o conteúdo de uma caixa de combinação, mas também a limpar o conteúdo de todas as caixas de combinação ao mesmo tempo em uma planilha do Excel.

Limpe facilmente o conteúdo da caixa de combinação pelo código VBA

---

Limpe facilmente o conteúdo da caixa de combinação pelo código VBA

Os dois códigos VBA a seguir podem ajudá-lo a limpar o conteúdo de uma caixa de combinação ou de todas as caixas de combinação na planilha ativa. Faça o seguinte.

1. Na planilha, você precisa limpar o conteúdo de uma caixa de combinação, pressione o botão outro + F11 chaves ao mesmo tempo para abrir o Microsoft Visual Basic para Aplicações janela.

2. No Microsoft Visual Basic para Aplicações janela, clique em inserção > Módulo. Em seguida, copie o código do VBA abaixo para a janela de código.

VBA 1: limpar o conteúdo de uma caixa de combinação na planilha

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

Nota: No código, “Drop Down 2” é o nome da caixa de combinação da qual você limpará o conteúdo. Por favor, mude para o seu próprio.

VBA 2: limpar o conteúdo de todas as caixas de combinação na planilha ativa

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. aperte o F5 ou clique no botão Executar para executar o código.

Em seguida, você pode ver que o conteúdo está limpo na caixa de combinação especificada ou em todas as caixas de combinação na planilha ativa, conforme a captura de tela abaixo:

Nota: os códigos VBA podem ser aplicados à caixa de combinação (controle de formulário) e à caixa de combinação (controle ActiveX).

---

Artigos relacionados:

• Como limpar conteúdo e formatação ao mesmo tempo em células no Excel?
• Como limpar o conteúdo do intervalo nomeado no Excel?
• Como limpar valores restritos em células no Excel?
• Como limpar o conteúdo da célula especificada se o valor de outra célula for alterado no Excel?
• Como limpar o conteúdo da célula especificada ao abrir e sair da pasta de trabalho do Excel?