Sommario
Sebbene non sia utilizzato molto spesso su questo sito, potresti trovarti in una situazione in cui desideri utilizzare il Fai fino al ciclo in Excel VBA. Il codice inserito tra Do Until e Loop verrà ripetuto finché la parte dopo Do Until è vera.
Posiziona un pulsante di comando sul foglio di lavoro e aggiungi le seguenti righe di codice:
Dim i As Integer
io = 1
Fai fino a quando i > 6
Celle(i, 1).Valore = 20
io = io + 1
Ciclo continuo
Risultato quando si fa clic sul pulsante di comando sul foglio:
Spiegazione: finché i non è maggiore di 6, Excel VBA inserisce il valore 20 nella cella all'intersezione della riga i e della colonna 1 e incrementa i di 1. Di conseguenza, il valore 20 verrà inserito nella colonna A sei volte (non sette perché Excel VBA si ferma quando sono uguale a 7).