☰

Ocultando linhas usando VBA

tag-icon • tag-icon microsoft-excel microsoft-excel-2010 vba macros
Ocultando linhas usando VBA

Tentei seguir uma pergunta anterior sobre como ocultar linhas com base no valor de uma célula (E19)

Sub HideIR()

If Range("$E$19").Value = "2" Then
        Rows("20:26").EntireRow.Hidden = True
    ElseIf Range("$E$19").Value = "1" Then
        Rows("20:26").EntireRow.Hidden = False
    End If

End Sub
Private Sub Worksheet_Change(ByVal Target As Range)
    If Range("$E$19").Value = "2" Then
        Rows("20:26").EntireRow.Hidden = True
    ElseIf Range("$E$19").Value = "1" Then
        Rows("20:26").EntireRow.Hidden = False

    End If
End Sub

Ele irá ocultar as células, porém não será atualizado quando eu alterar os valores sem executar a macro novamente.

Responder1

Você precisa colocar seu código emSub Worksheet_changedo módulo de código da sua planilha (não apenas um módulo geral), então ele será executado depois que você alterar qualquer valor na sua planilha.

informação relacionada