Easy-Micro


ESPACEMEMBRE Structures de contrôles VBA
For Next

Boucle For Next

Boucle pour répéter un bloc d'instructions un certain nombre de fois.

Le code suivant, affiche 3 messages :
Sub BoucleFor()
Dim N As Byte

For N = 1 To 3 Step 1
MsgBox "Message d'essai numéro " & N
Next
End Sub

Par défaut la valeur s'incrémente de 1. Sinon, écrivez For N = 1 To 5 Step 2.
Vous pouvez sortir prématurément d'une boucle en utilisant Exit For.

Autre exemple de boucle FOR NEXT
Sub Mon_Nuancier()

For i = 1 To 56 Step 1
Range("A" & i).Interior.ColorIndex = i
Range("B" & i).Value = i
Next i

End Sub


Suivez les aventures des skippers aquitains sur EasyVoile.com
Flux RSS Easy-Micro - Abonnez-vous Easy-Micro [ François Bisch ]
Lundi 20 mai 2019 - Semaine 21 - Saint Bernardin (Demain: Saint Constantin)
Aujourd'hui, c'est l'anniversaire de Elsa Lunghini (1973-46 ans), chanteuse (T'en va pas) et actrice française (La Femme de ma vie).
Haut de page Easy-Micro