Como imprimir todas as opções em uma lista suspensa no Excel?

Você já tentou imprimir todas as opções em uma lista suspensa em uma planilha do Excel? Este artigo aborda a impressão de todas as opções em uma lista suspensa em folhas separadas no Excel.

Imprimir todas as opções em uma lista suspensa com código VBA

Imprimir todas as opções em uma lista suspensa com código VBA

O seguinte código VBA pode ajudá-lo a imprimir todas as opções em uma lista suspensa na planilha. Por favor, siga os passos abaixo.

1. Pressione as teclas Alt + F11 para abrir a janela Microsoft Visual Basic for Applications.

2. Na janela Microsoft Visual Basic for Applications, clique em Inserir > Módulo. Em seguida, copie o seguinte código VBA para a janela Módulo. Veja a captura de tela:

Código VBA: Imprimir todas as opções em uma lista suspensa especificada em folhas separadas

Sub Iterate_Through_data_Validation()
    Dim xRg As Range
    Dim xCell As Range
    Dim xRgVList As Range
    Set xRg = Worksheets("Sheet1").Range("B8")
    Set xRgVList = Evaluate(xRg.Validation.Formula1)
    For Each xCell In xRgVList
        xRg = xCell.Value
        ActiveSheet.PrintOut
    Next
End Sub

Observação: No código, Planilha1 é o nome da planilha que contém a lista suspensa que você deseja imprimir. E B8 é a célula que contém a lista suspensa. Por favor, substitua-os conforme necessário.

3. Pressione a tecla F5 para executar o código.

Então, todas as opções na lista suspensa especificada em uma determinada planilha serão impressas separadamente.

Artigos Relacionados:

• Como preencher automaticamente outras células ao selecionar valores em uma lista suspensa no Excel?
• Como usar o autocompletar ao digitar em uma lista suspensa no Excel?
• Como criar um calendário em uma lista suspensa no Excel?
• Como criar uma lista suspensa pesquisável no Excel?
• Como criar uma lista suspensa com múltiplas seleções ou valores no Excel?