Ce site est optimisé pour être consulté depuis un navigateur moderne dans lequel JavaScript est activé.

Sortir d'une boucle While...Wend

ayi

Comment sortir prématurément d’une boucle While…Wend en VBA ?

ayi_2

Il n’y a pas d’instruction <code>Exit While</code> en VBA. Solutions :
<ol>
<li>Utilisez une variable booléenne :</li>
</ol>
<pre data-code-wrap="vba"><code class="lang-vba">Dim sortir As Boolean
While condition And Not sortir
If autreCond Then sortir = True
Wend

</code></pre>
<ol start="2">
<li>Convertissez en Do While (recommandé) :</li>
</ol>
<pre data-code-wrap="vba"><code class="lang-vba">Do While condition
If autreCond Then Exit Do
Loop

</code></pre>
La boucle <code>Do While...Loop</code> est préférable car elle supporte <code>Exit Do</code>.