VBA - código para esconder linhas

0

Estou tentando criar uma planilha em que, se o valor de uma célula for Ativo, a linha permanecerá. Se o valor da célula estiver inativo, a linha ficará oculta. Algum conselho?

Eu tenho o Excel 2016.

    
por chrisl 13.03.2018 / 19:10

1 resposta

0

Coloque a seguinte macro de evento na área de código da planilha:

Private Sub Worksheet_Change(ByVal Target As Range)
    If Target.Count > 1 Then Exit Sub
    If LCase(Target.Value) = "inactive" Then
        Application.EnableEvents = False
            Target.EntireRow.Hidden = True
        Application.EnableEvents = True
    End If
End Sub

Se uma célula ficar "inativa", sua linha ficará oculta. (O usuário sempre pode desfazer isso manualmente.)

Por ser um código de planilha, é muito fácil de instalar e usar automaticamente:

  1. clique com o botão direito do mouse no nome da guia próximo à parte inferior da janela do Excel
  2. selecione Exibir código - isso abre uma janela do VBE
  3. cole o material e feche a janela do VBE

Se você tiver alguma dúvida, tente primeiro em uma planilha de teste.

Se você salvar a pasta de trabalho, a macro será salva com ela. Se você estiver usando uma versão do Excel posterior a 2003, deverá salvar o arquivo como .xlsm em vez de .xlsx

Para remover a macro:

  1. abrir as janelas do VBE como acima
  2. limpe o código
  3. feche a janela do VBE

Para saber mais sobre macros em geral, consulte:

link

e

link

Para saber mais sobre macros de eventos (código da planilha), consulte:

link

As macros devem estar ativadas para que isso funcione!

    
por 13.03.2018 / 20:29