Usar para... Instruções Avançar
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.