/ / Excel VBA Do Until Loop

Excel VBA Do Until Loop

Sebbene non sia usato molto spesso su questo sito, potresti trovarti in una situazione in cui vuoi usare il Do Until Loop nel Excel VBA. Il codice inserito tra Do Until e Loop verrà ripetuto fino a quando la parte dopo Do Until è vera.

Inserire un pulsante di comando nel foglio di lavoro e aggiungere le seguenti linee di codice:

Dim i As Integer
i = 1

Do Until i > 6
    Cells(i, 1).Value = 20
    i = i + 1
Loop

Risultato quando si fa clic sul pulsante di comando sul foglio:

Excel VBA Do Until Loop

Spiegazione: finché I non è superiore a 6, VBA di Excel 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).

Leggi anche: