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

  • Artigo

Usar para... Próximas instruções para repetir um bloco de instruções um número específico de vezes. Para loops, use uma variável de contador cujo valor é aumentado ou reduzido a cada repetição do loop.

O procedimento a seguir faz com que o computador bipe 50 vezes. A instrução For especifica a variável de contador e seus valores de início e de extremidade. A instrução Next incrementa a variável de contador em 1.

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

Usando a palavra-chaveEtapa, você pode aumentar ou diminuir a variável de contador pelo valor especificado. No exemplo a seguir, a variável j de contador é incrementada por 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 de contador, use um valor de Etapa negativo. Para diminuir a variável de contador, você deve especificar um valor final menor que o valor inicial. No exemplo a seguir, a variável myNum de contador é reduzida 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

Observação

Não é necessário incluir o nome da variável de contador após a instrução Next . Nos exemplos anteriores, o nome da variável de contador foi incluído para legibilidade.

Você pode sair de um For... Próxima instrução antes do contador atingir 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 If... Então... Outra instrução é False e o loop continuará a ser executado conforme o esperado.

Confira também

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.