![](https://codky.com/wp-content/uploads/2024/11/2810-1024x576.png)
L’instruction `Do…Loop` dans VBA (Visual Basic for Applications) est utilisée pour répéter un bloc de code tant qu’une condition est vérifiée. Elle peut être utilisée de deux manières principales : `Do While` et `Do Until`. Voici comment chacune peut être utilisée :
Do While Loop
Cette boucle continue à s’exécuter tant qu’une condition spécifiée est vraie.
Sub ExempleDoWhile()
Dim i As Integer
i = 1
Do While i <= 10
Debug.Print "Valeur de i : " & i
i = i + 1
Loop
End Sub
Dans cet exemple, le bloc de code s’exécute et imprime la valeur de `i` dans la fenêtre de débogage jusqu’à ce que `i` soit supérieur à 10.
Do Until Loop
Cette boucle s’exécute jusqu’à ce qu’une condition spécifiée devienne vraie.
Sub ExempleDoUntil()
Dim i As Integer
i = 1
Do Until i > 10
Debug.Print "Valeur de i : " & i
i = i + 1
Loop
End Sub
Dans cet exemple, le bloc de code s’exécute et imprime la valeur de `i` jusqu’à ce que `i` soit supérieur à 10.
Do Loop While and Do Loop Until
Il est également possible de vérifier la condition après l’exécution d’une première itération de la boucle, ce qui garantit que le bloc de code s’exécute au moins une fois.
Exemple avec Do…Loop While
Sub ExempleDoLoopWhile()
Dim i As Integer
i = 1
Do
Debug.Print "Valeur de i : " & i
i = i + 1
Loop While i <= 10
End Sub
Exemple avec Do…Loop Until
Sub ExempleDoLoopUntil()
Dim i As Integer
i = 1
Do
Debug.Print "Valeur de i : " & i
i = i + 1
Loop Until i > 10
End Sub
Ces deux dernières variantes garantissent une exécution initiale du bloc de code avant que la condition ne soit évaluée. Utilisez la variante qui convient le mieux à la logique de votre programme.