Selecionando certas colunas com base em seu valor

Selecionando certas colunas com base em seu valor

Criei uma planilha com todas as minhas dúvidas.

Quero selecionar todas as colunas, por exemplo, com "B". Meu principal objetivo é ver como um verão rápido, todas as pessoas que reservaram. Então, se eu quiser ver todas as minhas consultas, posso selecionar apenas as colunas "E" e isso ocultará todos os meus cancelamentos e reservas.

lista de consultas

Responder1

Entendo que você deseja ocultar todas as colunas cuja primeira célula não contenha "E" ou "B". Isso requer uma macro VBA.

O primeiro passo é salvar a planilha para .xlsmpermitir macros VBA e, em seguida, abri-la usando o Excel.

Digite Alt+ F11para abrir o editor VBA. Clique com o botão direito em "Sheetl (Sheetl)" ou "ThisWorkbook" e selecione Inserir > Módulo.

Copie e cole o seguinte texto dentro do editor:

Sub Hide_Columns_Not_A()
Dim c As Range
For Each c In Range("A1:E1").Cells
    If c.Value <> "A" Then
        c.EntireColumn.Hidden = True
    Else
        c.EntireColumn.Hidden = False
    End If
Next c
End Sub

Sub Hide_Columns_Not_E()
Dim c As Range
For Each c In Range("A1:E1").Cells
    If c.Value <> "E" Then
        c.EntireColumn.Hidden = True
    Else
        c.EntireColumn.Hidden = False
    End If
Next c
End Sub

Sub Unhide_All_Columns()
Dim c As Range
For Each c In Range("A1:E1").Cells
    c.EntireColumn.Hidden = False
Next c
End Sub

Importante: Altere no texto acima todas as três ocorrências A1:E1 para o intervalo real, que no seu caso parece ser pelo menos A1:U1.

Em seguida, pressione Ctrl+ Spara salvar a planilha e depois Alt+ Qpara fechar o editor VBA e retornar ao Excel.

Você pode a partir de agora ir para oDesenvolvedorpainel, clique emMacrosque exibirá as três macros definidas, selecione aquela desejada e clique Correr.

insira a descrição da imagem aqui

informação relacionada