Bonsoir,
J'ai écrit ce bout de code
Ce que je ne comprends pas c'est que la variable i ne s'incrémente pas. Pourtant à la première itérration, on est dans le cas où l'on passe au else, donc pourquoi le i=i+1 ne se fait pas ???? i reste toujours à 0 ce qui fait qu'en fin de compte ma boucle tourne vraiment en rond !!!
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10 Rows("6:18").EntireRow.Hidden = True startcell = 6 cell = startcell i = 0 If cell <> startcell + 3 * i And cell < 19 And i < 10 Then cell = cell + 1 Else: Cells(cell, 1).EntireRow.Hidden = False i = i + 1 End If
Merci pour votre aide.
Gwen
Partager