XL 2010 Macro exécution qui boot

[DAVAWAY]

Bonjour,
Je rencontre une difficulté d'utilisation d'une macro..😱
En effet, la macro du bouton "masquer" de l'onglet "échantillon (=module 5) ne s'exécute pas normalement si bien que je suis obligé de stopper son exécution avec ctrl+pause.
Il semble que "next i" (débogage) soit en cause et la ça devient compliqué pour moi 😕 !
Quelqu'un peut m'aider ce serait très sympa 😉 ?

 

[Roland_M]

bonjour,

comme ceci ça fonctionne !
et ce n'est pas next i même s'il est surligné, c'est ton ctrl+pause qui s'arrête dessus !

Sub masquer2()
Application.ScreenUpdating = False: Application.Calculation = xlCalculationManual
With Sheets("échantillon")
For i = .[r65000].End(xlUp).Row To 1 Step -1
If .Cells(i, "R").Value = "non" Then .Rows(i).Hidden = True
Next i
End With
Application.ScreenUpdating = True: Application.Calculation = xlCalculationAutomatic
End Sub

 

[DAVAWAY]

Merci beaucoup Roland, le code est stabilisé et efficient, je te remercie ++ 🙂

 

[Roland_M]

re

si tu utilises les événements tu peux rajouter ceci en début et fin pareil !
Application.EnableEvents = False
Application.EnableEvents = True

 

[DAVAWAY]

Merci pour ce complément d'info 😉