10 Exemplos de Macros No Excel
10 Exemplos de Macros No Excel
10 Exemplos de Macros No Excel
Para aproveitar toda a potencia que o Excel possui, indispensvel a utilizao de macros. Macro
poder ser definida como uma serie de comandos(em sequencia), que podem ser cliques, toques
no teclado ou at mesmo pequenas linhas de cdigos com funes mais avanadas. Essas sequencias
so gravadas em um modulo VBA e so executados sempre que for necessrio. O principal beneficio
de uma macro o ganho de tempo que ela proporciona, afinal ela automatiza algo que teria que ser
feito de forma manual em diversas etapas. Muito utilizadas quando preciso executar varias vezes o
mesmo conjunto de tarefas.
Usando o gravador de Macros: Nesse procedimento o Excel armazena cada ao que far parte
da Macro, depois o gravador de macro converte essas aes em comandos VBA(Visual Basic
for Applications). Voc gostaria de ter uma planilha para
melhorar alguma atividade sua?
Usando VBA: Se voc entende um pouco de programao ou mesmo domina a linguagem VBA,
pode criar suas macros por conta prpria. Para isso basta
Sim utilizar o editor de VBA presente nas
verses mais recentes do Microsoft Excel.
No
Como dito anteriormente possvel realizar uma infinidade de operaes com as macros, no entanto
existem algumas que se destacam das demais por serem
Notmais utilizadas
using Hotjar yet? Enviar
no dia-a-dia. Veja 10 macros
https://blog.luz.vc/excel/10-exemplos-de-macros-essenciais-no-excel/ 1/17
31/10/2017 10 exemplos de macros essenciais no Excel - Blog LUZ
1)Mostrando umamensagem
Basta inserir na sua macro o comando MsgBox. Veja como no exemplo abaixo:
Sim
No
https://blog.luz.vc/excel/10-exemplos-de-macros-essenciais-no-excel/ 2/17
31/10/2017 10 exemplos de macros essenciais no Excel - Blog LUZ
Essa linha de cdigo pode ser inserida em qualquer macro, muito til nos casos onde se faz
necessrio emitir avisos ao usurio da planilha que est rodando a macro.
Sub Auto_Open()
MsgBox Para saber tudo sobre Excel, acesse www.https://luz.vc/
Voc gostaria de ter uma planilha para
End Sub melhorar alguma atividade sua?
Sim
No
https://blog.luz.vc/excel/10-exemplos-de-macros-essenciais-no-excel/ 3/17
31/10/2017 10 exemplos de macros essenciais no Excel - Blog LUZ
No exemplo acima, assim que a planilha for aberta uma mensagem ser exibida. No se esquea de
habilitar as macros no seu Excel.
Sub escreverDataEHora()
Range(A1) = Now
End Sub
Sim
No
https://blog.luz.vc/excel/10-exemplos-de-macros-essenciais-no-excel/ 4/17
31/10/2017 10 exemplos de macros essenciais no Excel - Blog LUZ
Sim
No
https://blog.luz.vc/excel/10-exemplos-de-macros-essenciais-no-excel/ 5/17
31/10/2017 10 exemplos de macros essenciais no Excel - Blog LUZ
Sub fazerAlgoACadaCelula()
For Each cell In Selection.Cells
MsgBox cell
Next
End Sub
Voc gostaria de ter uma planilha para
melhorar alguma atividade sua?
Sim
No
https://blog.luz.vc/excel/10-exemplos-de-macros-essenciais-no-excel/ 6/17
31/10/2017 10 exemplos de macros essenciais no Excel - Blog LUZ
Sub fazerAlgoATodasAsCelulas()
Selection.Cells.Value = Ol
End Sub
Sim
No
https://blog.luz.vc/excel/10-exemplos-de-macros-essenciais-no-excel/ 7/17
31/10/2017 10 exemplos de macros essenciais no Excel - Blog LUZ
Sim
No
https://blog.luz.vc/excel/10-exemplos-de-macros-essenciais-no-excel/ 8/17
31/10/2017 10 exemplos de macros essenciais no Excel - Blog LUZ
Voc pode fazer uma infinidade de inseres no cdigo, como por exemplo mudar a cor do texto,
tamanho da fonte, tipo de fonte e muito mais.
Sub verificarFormula()
If Range(A1).HasFormula = True Then
MsgBox Existe Formula
Else
MsgBox No uma Formula
End If Voc gostaria de ter uma planilha para
End Sub melhorar alguma atividade sua?
Sim
No
https://blog.luz.vc/excel/10-exemplos-de-macros-essenciais-no-excel/ 9/17
31/10/2017 10 exemplos de macros essenciais no Excel - Blog LUZ
Cells.Interior.ColorIndex = xlNone
No
Linha2 = Target.Row
Not using Hotjar yet? Enviar
https://blog.luz.vc/excel/10-exemplos-de-macros-essenciais-no-excel/ 10/17
31/10/2017 10 exemplos de macros essenciais no Excel - Blog LUZ
With Linha
.Interior.ColorIndex = 12
End With
End Sub
No
Esta macro , altera as cores no interior e na fonte das clulas, de acordo com a letra das clulas.
https://blog.luz.vc/excel/10-exemplos-de-macros-essenciais-no-excel/ 11/17
31/10/2017 10 exemplos de macros essenciais no Excel - Blog LUZ
Sub Colorir_fonte_interior_letra()
For N = 1 To Range(O65536).End(xlUp).Row
Case B
Range(O & N).Interior.ColorIndex = 4
Range(O & N).Font.ColorIndex = 2
Case C
Range(O & N).Interior.ColorIndex = 5
Range(O & N).Font.ColorIndex = 3
Case D
Range(O & N).Interior.ColorIndex = 7
Range(O & N).Font.ColorIndex = 12
Case Else
Range(O & N).Interior.ColorIndex = 6
Range(O & N).Font.ColorIndex = 4
End Select
Next N
End Sub
Sim
No
https://blog.luz.vc/excel/10-exemplos-de-macros-essenciais-no-excel/ 12/17
31/10/2017 10 exemplos de macros essenciais no Excel - Blog LUZ
Sub ExcelFalando()
Sim
End Sub
No
https://blog.luz.vc/excel/10-exemplos-de-macros-essenciais-no-excel/ 13/17
31/10/2017 10 exemplos de macros essenciais no Excel - Blog LUZ
Sub Desbloqueia_Planilha()
For l = 65 To 66
Sim
For m = 65 To 66
For i1 = 65 To 66 No
For i2 = 65 To 66
For i3 = 65 To 66 Not using Hotjar yet? Enviar
https://blog.luz.vc/excel/10-exemplos-de-macros-essenciais-no-excel/ 14/17
31/10/2017 10 exemplos de macros essenciais no Excel - Blog LUZ
For i4 = 65 To 66
For i5 = 65 To 66
For i6 = 65 To 66
For n = 32 To 126
ActiveSheet.Unprotect Chr(i) & Chr(j) & Chr(k) & _
Chr(l) & Chr(m) & Chr(i1) & Chr(i2) & Chr(i3) & _
Chr(i4) & Chr(i5) & Chr(i6) & Chr(n)
If ActiveSheet.ProtectContents = False Then
MsgBox Sua planilha foi desbloqueada
Exit Sub
End If
Next
Next
Next
Next
Next
Next
Next
Next
Next
Next
Next
Next
End Sub
Sim
No
https://blog.luz.vc/excel/10-exemplos-de-macros-essenciais-no-excel/ 15/17
31/10/2017 10 exemplos de macros essenciais no Excel - Blog LUZ
Execute essa macro na planilha bloqueada e espere at que a senha seja quebrada.
Obs: Cuidado com o numero de next no final na macro, eles devem fechar os laos FOR abertos.
Esses so apenas alguns exemplos de macros que voc pode utilizar no dia a dia. Vale lembrar que
toda macro um mini programa e por isso fundamental ter cuidado para no executar qualquer tipo
de macro, principalmente se ela vier em planilhas de terceiros.
E voc j usa alguma macro no seu cotidiano? Compartilhe conosco a sua experincia
deixando um comentrio ou entrando em contato!
Sim
Rafael vila
Administrador e turismlogo, apaixonado pelas possibilidades que o Excel d para gestores, empreendedores e
No
estudantes. scio diretor da rea de planilhas na LUZ - Planilhas Empresariais (luz.vc) e o responsvel pelo
desenvolvimento das mais de 150 planilhas com foco empresarial e pessoal comercializadas em seu site. Tambm
Not using Hotjar yet? Enviar
https://blog.luz.vc/excel/10-exemplos-de-macros-essenciais-no-excel/ 16/17
31/10/2017 10 exemplos de macros essenciais no Excel - Blog LUZ
ministra os cursos online de Excel (cursos.luz.vc) e gosta de ajudar milhares de planilheiros por meio do Frum e Blog
da LUZ.
Sim
No
https://blog.luz.vc/excel/10-exemplos-de-macros-essenciais-no-excel/ 17/17