Treinamento de Excel Aula 5: Automatizar tarefas usando o gravador de macros

Roteiro da Aula:

• Ativar a guia "Desenvolvedor"

• Conhecendo o gravador de macros

• Criando botões para executar as macros

• Criando a macro "Salvar"

• Criando a macro "ExcluiLinhas"
• Primeiros passos com VBA

Sub ExcluiLinhas()
' Macro para excluir linhas com base nas células selecionadas.


    If ActiveCell.Row > 1 And ActiveCell.Row <= 8 Then 'Avalia se a linha da célula ativa está entre as linhas 1 e 8




        'Note que não há instrução para ser executada aqui, entre a instrução

        'If e Else. Isso significa que nada acontecerá. Porquê? As linhas 1 a 8 

        'contém informações ou formatações que eu não quero excluir pois são a 

        'área principal da nossa aplicação.


    Else 'Se não for verdadeira a condição acima

        

        ActiveSheet.Unprotect 'Desprotege a planilha ativa
        Selection.EntireRow.Delete 'Exclui a linha inteira do intervalo selecionado
        ActiveSheet.Protect 'Protege a planilha ativa 

    
    End If


End Sub

Assista ao vídeo: