Page 38 - DCG - Excel - 2025
P. 38
FICHE Excel n°28 : DO LOOP en VBA
Capsule vidéo
1. Le concept
La structure DO...LOOP permet de répéter une action jusqu’à ce qu’une condition soit remplie. Elle est
utilisée quand on ne connaît pas le nombre exact de répétitions à l’avance.
2. Syntaxes principales
Do While (condition)
instructions
Loop
Do
instructions
Loop Until (condition)
3. Exemple expliqué
i = 1
Do While Cells(i, 1).Value <> ""
Cells(i, 2).Value = Cells(i, 1).Value * 2
i = i + 1
Loop
→ Double toutes les valeurs de la colonne A tant qu’il y a du contenu
4. Mini exercice
Créez une macro qui lit les cellules de la colonne A jusqu’à une cellule vide, et inscrit "OK" dans la colonne B
quand la cellule vide est trouvée.
5. Exercice d’application
• Ouvrir un classeur vierge et le renommer TPLoop.xlsm
• Remplir la colonne C de quelques nombres.
• Écrire une macro qui :
• Parcourt les cellules ligne par ligne dans la colonne C
• Tant que la valeur est < 100, elle colore la cellule
• Sort de la boucle si une cellule contient 0 ou est vide
• Afin d’enrichir votre feuille, placez un bouton sur la feuille qui déclenchera l’appel de la macro.
36

