Como mostrar todas as colunas usando vba (com exemplo)

Você pode usar a propriedade Hidden no VBA para exibir uma coluna em uma determinada planilha.

Para exibir todas as colunas de uma determinada planilha, você pode usar a seguinte sintaxe:

 Sub UnhideAllColumns()

Columns.EntireColumn.Hidden = False

End Sub

Usando a propriedade Hidden e especificando o valor False , dizemos ao Excel para exibir todas as colunas da planilha atual.

O exemplo a seguir mostra como usar essa sintaxe na prática.

Exemplo: como exibir todas as colunas usando VBA

Digamos que temos uma planilha Excel com informações sobre diferentes jogadores de basquete:

Agora suponha que destacamos as colunas A e B, clique com o botão direito e clique em Ocultar :

Ambas as colunas ficarão ocultas:

Agora, digamos que queremos usar o VBA para exibir automaticamente todas as colunas desta planilha.

Podemos criar a seguinte macro para fazer isso:

 Sub UnhideAllColumns()

Columns.EntireColumn.Hidden = False

End Sub

Assim que esta macro for executada, todas as colunas ficarão visíveis:

Observe que todas as colunas do nosso conjunto de dados original estão visíveis novamente.

Observe que se quiser exibir todas as colunas de todas as planilhas em uma pasta de trabalho do Excel, você pode criar a seguinte macro para fazer isso:

 Sub UnhideAllColumnsAllSheets()

Dim ws As Worksheet

    For Each ws In Worksheets
        ws.Columns.EntireColumn.Hidden = False
    Next ws

End Sub

Usando um loop For Each simples, podemos percorrer cada planilha de nossa pasta de trabalho e exibir todas as colunas de cada planilha.

Nota : Você pode encontrar a documentação completa da propriedade Hidden no VBA aqui .

Recursos adicionais

Os tutoriais a seguir explicam como realizar outras tarefas comuns em VBA:

VBA: Como exibir todas as planilhas
VBA: Como encontrar a última coluna usada
VBA: Como contar o número de colunas usadas