Usar para... Instruções Avançar

Use para... Next para repetir um bloco de instruções um número específico de vezes. Os loops For usam uma variável de contador cujo valor é aumentado ou diminuído a cada repetição do loop.

O procedimento a seguir faz com que o computador emita 50 bipes. A instrução For especifica a variável do contador e seus valores inicial e final. A instrução Next incrementa a variável do contador em 1.

Sub Beeps() 
    For x = 1 To 50 
        Beep 
    Next x 
End Sub

Usando a palavra-chaveStep, você pode aumentar ou diminuir a variável do contador pelo valor especificado. No exemplo a seguir, a variável j do contador é incrementada em 2 cada vez que o loop se repete. Quando o loop é concluído, total é a soma de 2, 4, 6, 8 e 10.

Sub TwosTotal() 
    For j = 2 To 10 Step 2 
        total = total + j 
    Next j 
    MsgBox "The total is " & total 
End Sub

Para diminuir a variável do contador, use um valor de Etapa negativo. Para diminuir a variável do contador, você deve especificar um valor final menor que o valor inicial. No exemplo a seguir, a variável myNum do contador é diminuída em 2 cada vez que o loop se repete. Quando o loop é concluído, total é a soma de 16, 14, 12, 10, 8, 6, 4 e 2.

Sub NewTotal() 
    For myNum = 16 To 2 Step -2 
        total = total + myNum 
    Next myNum 
    MsgBox "The total is " & total 
End Sub

Você pode sair de um For... Next antes que o contador atinja seu valor final usando a instrução Exit For . Por exemplo, quando ocorre um erro, use a instrução Exit For no bloco da instrução True de uma instrução If...Then...Else ou de uma instrução Select Case que verifica especificamente o erro. Se o erro não ocorrer, o erro Se... Então... Else é False e o loop continuará a ser executado conforme o esperado.

Confira também

• Tópicos conceituais do Visual Basic

Suporte e comentários

Tem dúvidas ou quer enviar comentários sobre o VBA para Office ou sobre esta documentação? Confira Suporte e comentários sobre o VBA para Office a fim de obter orientação sobre as maneiras pelas quais você pode receber suporte e fornecer comentários.