Tratamento de erro no VBA. Conheça a instrução "On Error GoTo".
O que fazer quando o VBA apresenta um erro no Excel? Usamos a instrução "On Error" para seu código VBA seguir até o fim. Confira!
#excel #excelbr #vba #excelvba
👉 QUEM SOMOS:
Nosso canal tem como objetivo ensinar Excel e VBA a internautas com pouco ou nenhum conhecimento sobre o assunto. VBA, ou Visual Basic for Application, é uma linguagem de programação que automatiza qualquer tarefa em suas planilhas. Confira!
🔵 CAPÍTULOS:
00:00 O VBA apresentou um erro, o que fazer?
02:40 Segunda forma de tratar erros no VBA.
05:25 Terceira forma de tratar erros no VBA.
🔵 VÍDEOS MENCIONADOS:
GoTo: • Incrível ferramenta do VBA: instrução GoTo.
🔵 CÓDIGO DESTE VÍDEO:
Sub Erro_01()
On Error GoTo PontoA
Dim Linha%
Dim Resul@
For Linha = 3 To 12
Resul = [A1] / Range("A" & Linha)
Range("B" & Linha) = Resul
Next Linha
Exit Sub
PontoA:
MsgBox "Div. impossível: " & Linha
End Sub
'-------------------------------------------------------------------
Sub Erro_02()
On Error GoTo MeuErro
Dim Linha%
Dim Resul As Variant
For Linha = 3 To 12
Resul = [A1] / Range("A" & Linha)
Range("B" & Linha) = Resul
Next Linha
Exit Sub
MeuErro:
Resul = "Div. impos."
Resume Next
End Sub
'-------------------------------------------------------------------
Sub Erro_03()
On Error GoTo PontoA
Dim Linha%
Dim Resul@
For Linha = 3 To 12
Resul = [A1] / Range("A" & Linha)
Range("B" & Linha) = Resul
Next Linha
Exit Sub
PontoA:
Range("A" & Linha) = "10"
Resume 0
End Sub
📌 DOWNLOAD ARQUIVOS GRÁTIS:
https://drive.google.com/drive/folder...
