Boucles en VBA
Clark Devlin
-
kneko -
kneko -
Bonjour!
Est-ce que les instructions que l'on met dans un then ou un else sont prises dans l'ordre ou non?
Par exemple:
...
If Cells(i, 2).Value = Cells(i + 1, 2).Value Then
compteur1 = compteur1 + 1
i = i + 1
Else
Sheets("Feuil1").Select
Cells(i, 1).Select
'on copie le nom
Selection.Copy
Sheets("Feuil2").Select
'on sélectionne la cellule i+compteur
Cells(2, k + compteur1).Select
k = k + 1
Selection.PasteSpecial Paste:=xlAll, operation:=xlNone, _
skipblanks:=False, Transpose:=True
compteur=compteur+1
End If
Est-ce que 'compteur' est incrémenté tout à la fin ou en même temps que les autres instructions?
Est-ce que les instructions que l'on met dans un then ou un else sont prises dans l'ordre ou non?
Par exemple:
...
If Cells(i, 2).Value = Cells(i + 1, 2).Value Then
compteur1 = compteur1 + 1
i = i + 1
Else
Sheets("Feuil1").Select
Cells(i, 1).Select
'on copie le nom
Selection.Copy
Sheets("Feuil2").Select
'on sélectionne la cellule i+compteur
Cells(2, k + compteur1).Select
k = k + 1
Selection.PasteSpecial Paste:=xlAll, operation:=xlNone, _
skipblanks:=False, Transpose:=True
compteur=compteur+1
End If
Est-ce que 'compteur' est incrémenté tout à la fin ou en même temps que les autres instructions?
3 réponses
-
le langage macro de kro$oft (visual basic) est un basic donc ligne à ligne .
en clair 1 ligne est traitée à la fois et seulement une. -
Une précision: pour réinitialiser compteur à 0 après chaque incrémentation de i, où dois-je placer l'instruction 'compteur=0'?
-
apres l'incrementation de i
mais avant la condition else
if ..........
++i
compteur==0;
else
.......
en VB
if ............
i = i + 1
compteur = 0
else
..........
