Índice
Embora não seja usado com frequência neste site, você pode se encontrar em uma situação em que deseja usar o Do Até Loop em Excel VBA. O código colocado entre Do Until e Loop será repetido até que a parte depois do Do Until seja verdadeira.
Coloque um botão de comando em sua planilha e adicione as seguintes linhas de código:
Dim i As Integer
i = 1
Faça até i> 6
Células (i, 1). Valor = 20
i = i + 1
Ciclo
Resultado quando você clica no botão de comando na planilha:
Explicação: até que i seja maior que 6, o Excel VBA coloca o valor 20 na célula na interseção da linha i e coluna 1 e incrementa i por 1. Como resultado, o valor 20 será colocado na coluna A seis vezes (não sete porque o Excel VBA para quando i é igual a 7).
