Discussion :

[kacedda]

Bonjour,

J'ai un fichier avec plusieurs feuilles, sur la feuille que je souhaite attaquer, j'ai des filtres automatique. Je souhaite annuler le filtre dans une macro, voici:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
Sub MaMacro()
   Sheets("MaFeuille").Select
   ActiveSheet.ShowAllData
ou
   ShowAllData
ou
   Sheets("MaFeuille").ShowAllData
End Sub

Dans tous les cas je me prend une erreur:
Erreur '1004':
La méthode ShowAllData de la classe Worksheet a échoué.
J'ai essayé la méthode ClearAllAutoFilters et pareil. Le pire c'est que j'ai un fichier fait par un autre bonhomme dans lequel ça marche bien!! mais je vois pas où je fais différent... et le bonhomme est parti!

C'est lundi, et je comprend pas...

Merci pour vos lumières

[BenjGe]

ta plage n'a plus de filtre actif. En clair ta feuille ne filtre pas même si les boutons sont apparents.

Ecris le comme ça:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
on error resume next
Worksheets("Ma Feuille").ShowAllData
on error goto 0

[kacedda]

Merci, c'est nickel!