Bonsoir,

J'ai écrit ce bout de code

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
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 !!!

Merci pour votre aide.

Gwen