Incrível ferramenta do VBA: instrução GoTo.

Опубликовано: 10 Июнь 2025
на канале: Explorar Excel

380

Com a expressão "GoTo", é possível manipular a execução do VBA da forma que for conveniente para o programador. E isso é uma ferramenta muito poderosa dentro do Excel. Confira!

#excel #excelbr #vba #excelvba #excelshorts

👉 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!

🔵 CÓDIGO DESTE VÍDEO:
Sub Goto_01()
MsgBox "Inicio do código."
GoTo PontoB

PontoA:
MsgBox "Executando PontoA."
GoTo Fim

PontoB:
MsgBox "Executando PontoB."
GoTo PontoA

Fim:
MsgBox "Fim da Instrução GoTo do Excel VBA."
End Sub

'-----------------------------------------------------------------------------------
Sub Goto_02()
Dim Linha%
Dim Aluno$

Linha = 4
Aluno = "Silva de Almeida"

Do While Linha MENOR 13
If Range("B" & Linha) = Aluno Then
Range("B" & Linha).Interior.ColorIndex = 3
GoTo A
End If

Linha = Linha + 1
Loop

A:
MsgBox "Aluno encontrado na linha " & Linha
End Sub

'-----------------------------------------------------------------------------------
Sub Goto_03()
Dim Linha%
Dim Nota#
Linha = 4

PontoA:
Nota = Range("C" & Linha)
If Nota = 0 Then Exit Sub
If Nota MENOR= 59 Then GoTo PontoB
If Nota MAIOR= 60 Then GoTo PontoC
Exit Sub

PontoB:
Range("D" & Linha) = "Repr."
Linha = Linha + 1
GoTo PontoA

PontoC:
Range("D" & Linha) = "Apro."
Linha = Linha + 1
GoTo PontoA
End Sub

📌 DOWNLOAD ARQUIVOS GRÁTIS:
https://drive.google.com/drive/folder...