Table des matières:
- For - Next
- Pour chaque - Suivant
- Do - Loop Until
- Do While - Loop
- If - Then
- Si - Alors - Fin Si
- If - Then - Else
- Si - Alors - Sinon - Fin Si
- Sélectionner le cas
- Aller à
Vidéo: #45 - Curso de Macros e Excel VBA - Caixa de Listagem ou ListBox 2025
Voici une liste des dix structures de contrôle de programmation VBA Excel les plus couramment utilisées. Inclus est un exemple simple de chaque structure de contrôle et une brève description de quand vous utiliserez cette structure.
For - Next
Utile pour faire une boucle dans un tableau.
ArraySum = 0 Pour i = 1 à 10 ArraySum = ArraySum + MyArray (i) Suivant i
Pour chaque - Suivant
Utile pour faire une boucle dans une collection ou une plage de cellules.
SelectionSum = 0 Pour chaque cellule En sélection SelectionSum = SelectionSum + cell. Valeur Cellule Next
Do - Loop Until
Boucle jusqu'à ce qu'une condition soit remplie.
Row = 0 Do Row = Row + 1 Boucle jusqu'à des cellules (Row, 1). Value = "MsgBox" La première cellule vide est dans la ligne "& Row
Do While - Loop
Boucle alors qu'une condition est vraie.
Row = 1 Do While Cells (Row, 1)" Row = Row + 1 Boucle MsgBox "La première cellule vide est dans Row" & Row
If - Then
Faites quelque chose si une condition est vraie. Écrit comme une seule déclaration.
Si x = 1 Alors y = 1
Si - Alors - Fin Si
Faites quelque chose si une condition est vraie. Peut utiliser plusieurs instructions.
Si x = 1 Alors y = 1 z = 1 Fin Si
If - Then - Else
Faire quelque chose si une condition est vraie; sinon, fais autre chose. Écrit comme une seule déclaration.
Si x = 1 Alors y = 1 Sinon y = 0
Si - Alors - Sinon - Fin Si
Faites quelque chose si une condition est vraie; sinon, fais autre chose. Peut utiliser plusieurs instructions.
Si x = 1 Alors y = 1 Z = 1 Sinon y = 0 Z = 0 Fin Si
Sélectionner le cas
Effectuez l'une des choses suivantes, en fonction d'une condition.
Sélectionner le cas x Cas 1 y = 1 Z = 1 Cas est> 1 y = 2 Z = 2 Cas Autre Else = 0 Z = 0 Fin Sélectionner
Aller à
Passer à une instruction étiquetée. Ceci est principalement utilisé pour la gestion des erreurs.
On Error GoTo Oops '[plus de code va ici] Quitter Sub Oops: MsgBox "Une erreur est survenue"
