Como usar a instrução Exit no VBA?

No VBA (Visual Basic for Applications), a instrução `Exit` é usada para interromper a execução de um bloco de código antes que ele atinja o seu final natural. A forma como você utiliza `Exit` depende do tipo de bloco de código que você deseja sair. Aqui estão alguns exemplos de como usar a instrução `Exit`:

    Sub ExemploSub()
        Dim i As Integer
        For i = 1 To 10
            If i = 5 Then
                Exit Sub ' Sai do procedimento quando i for igual a 5
            End If
            Debug.Print i
        Next i
        ' Código aqui não será executado se Exit Sub for acionado
    End Sub
    Function ExemploFunction() As String
        Dim i As Integer
        For i = 1 To 10
            If i = 5 Then
                ExemploFunction = "Saída Antecipada" ' Define o valor de retorno antes de sair
                Exit Function ' Sai da função
            End If
        Next i
        ExemploFunction = "Final" ' Define um valor de retorno padrão
    End Function
    Sub ExemploExitFor()
        Dim i As Integer
        For i = 1 To 10
            If i = 5 Then
                Exit For ' Sai do loop quando i for igual a 5
            End If
            Debug.Print i
        Next i
        ' Após Exit For, execução continua aqui
    End Sub
    Sub ExemploExitDo()
        Dim i As Integer
        i = 0
        Do While i < 10
            i = i + 1
            If i = 5 Then
                Exit Do ' Sai do loop quando i for igual a 5
            End If
            Debug.Print i
        Loop
        ' Após Exit Do, execução continua aqui
    End Sub
  • Exit Sub: Use em um procedimento Sub para sair do procedimento antes de finalizar.
  • Exit Function: Use em uma função para sair e retornar um valor antes de finalizar.
  • Exit For: Use para sair de um loop `For` antes de ele completar todas as iterações.
  • Exit Do: Use para sair de um loop `Do` antes da condição de término ser verdadeira.

Esses comandos são úteis para controlar o fluxo de execução e para sair de loops ou procedimentos quando uma certa condição é atendida.

Unlock Your Potential

Excel

Basic - Advanced

Access

Access Basic - Advanced

Power BI

Power BI Basic - Advanced

Help us grow the project