Para fazer um loop no Excel, siga os seguintes passos:
Sub ExemploDeLoop()
Dim i As Integer
For i = 1 To 10
Range("A" & i).Value = i
Next i
End Sub
Neste exemplo, o loop irá percorrer as células A1 a A10 e inserir o valor de 1 a 10 em cada célula. 5. Salve o módulo clicando em “Salvar” na barra de menus. 6. Clique em “Executar” ou use a combinação de teclas F5 para executar o seu loop.
Agora você deve ver o resultado do seu loop na planilha do Excel. Isso é tudo que você precisa saber para fazer um loop no Excel.