Ocultar colunas de acordo com valor de célula !!!

[leandroandrea07]

Boa tarde,

 

preciso que o Excel oculte as colunas de acordo com o valor de uma determinada célula da própria coluna.

Por exemplo, na Planilha "Leandro", tenho a sheet "Idade", e caso o valor da célula "B2" da sheet "Idade", seja igual a "Z", a coluna "B" seria ocultada.

 

Tentei o código abaixo mas não funcionou:

 

If Range(“Idade!B2”) = "Z" Then

Columns(“Idade!B”).EntireColumn.Hidden = True

Else

Columns(“Idade!B”).EntireColumn.Hidden = False

End If

 

Seria melhor ainda, se fosse possível que na "linha 2", o comando procurasse todos os valores iguais a "Z", e ocultasse sua respectiva coluna.

 

Isso é possível ?

 

Desde já, agradeço.

 

[DJunqueira]

Solução alternativa.

porque você não monta uma formatação condicional na coluna B q sempre q determinado valor for alcançado (digitado, etc) a cor do texto fica branco?

[leandroandrea07]

1 hora atrás, DJunqueira disse:

Solução alternativa.

porque você não monta uma formatação condicional na coluna B q sempre q determinado valor for alcançado (digitado, etc) a cor do texto fica branco?

Boa tarde DJunqueira,

 

preciso que as colunas fiquem ocultas.

[DJunqueira]

Private Sub Worksheet_Change(ByVal Target As Range)
    If Range("B2").Value = "Z" Then
    Columns("B:B").EntireColumn.Hidden = True
    Else
    Columns("B:B").EntireColumn.Hidden = False
    End If
End Sub

 

[leandroandrea07]

2 horas atrás, DJunqueira disse:

Private Sub Worksheet_Change(ByVal Target As Range)
    If Range("B2").Value = "Z" Then
    Columns("B:B").EntireColumn.Hidden = True
    Else
    Columns("B:B").EntireColumn.Hidden = False
    End If
End Sub

 

 

DJunqueira,

 

muito obrigado, esta funcionando perfeitamente.

 

Podem fechar o tópico.

 

Obrigado