Bonsoir,
Peut-être suis-je très fatigué mais il y a un truc que je ne saisis pas : pourquoi ai-je une erreur "Membre de méthode ou de données introuvable" sur la ligne en gras dans le code suivant :
Quand je teste W, le compilateur me dit que W est nothing. Il ne tient donc pas compte de la ligne Set W ... Mais pourquoi donc ?
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10 Dim W as WorkSheets Sub saveAndCloseFilter() filtre = False Set W = Sheets("Journal") If W.AutoFilterMode Then filtre = True 'un filtre est en place With W.AutoFilter ...................
Un grand merci pour vos explications.
Bonne soirée.
Siso
Partager