Au fait, c'est au bout d'une certaine valeur dans les boucles (72 lignes) qu'apparait le message d'erreur.
Voici le code
Sheets('reporting').Select
nb_ligne = Range('BA1')
For x = 9 To nb_ligne + 8
For b = 1 To 5
c = b + 78
If Cells(c, x) = False Then
Stop
If Cells(b + 71, x) = 1 Then
Stop
Cells(77, x) = 1
Stop
End If
End If
Next b
Next x
Selection.AutoFilter Field:=77, Criteria1:='=1'
End If
A quoi correspond ce message d'erreur?( 2015 )
Merci
Max