Cuprins
Deși nu este folosit foarte des pe acest site, s-ar putea să vă aflați într-o situație în care doriți să utilizați Fă până la buclă în Excel VBA. Codul plasat între Do Until și Loop va fi repetat până când partea de după Do Until este adevărată.
Plasați un buton de comandă pe foaia de lucru și adăugați următoarele linii de cod:
Dim i As Integer
i = 1
Fă până la i> 6
Celule (i, 1). Valoare = 20
i = i + 1
Buclă
Rezultatul când faceți clic pe butonul de comandă de pe foaie:
Explicație: până când i este mai mare de 6, Excel VBA plasează valoarea 20 în celulă la intersecția rândului i și coloanei 1 și crește i cu 1. Ca rezultat, valoarea 20 va fi plasată în coloana A de șase ori (nu șapte, deoarece Excel VBA se oprește când i este egal cu 7).