VBA - Macro Filtre automatique - Erreur 1004 Résolu

Question

Bonsoir à tous,

J'ai développé sur un autre PC (avec Excel 2016) une macro intégrant la méthode Autofilter pour des dates. Lorsque j'ouvre le fichier sur mon ordinateur (avec Excel 2020), j'obtiens l'erreur suivante :

"Erreur d'execution 1004
La méthode Autofilter de la classe Range a échoué"

J'ai cherché et testé plusieurs choses mais rien à faire. Je suis donc revenu aux bases et j'ai crée un petit exemple. En utilisant l'enregistreur de macro, j'obtiens ce code ...

Sub Macro_Filtre()

ActiveSheet.Range("$C$4:$F$10").AutoFilter Field:=2, Operator:= _
        xlFilterValues, Criteria2:=Array(1, "1/1/2020")
    
End Sub


pour le tableau suivant :


Et même en re-exécutant le code de l'enregistreur, l'erreur persiste ! (J'execute bien depuis la feuille ce n'est donc pas à cause du ActiveSheet, d'ailleurs on mettant Thisworbook.Sheets... ça ne change rien)

Que-ce que je fais de mal ?

Lien du fichier : https://www.cjoint.com/c/JInr1t6U0gu

Merci d'avance !

f894009 · Answer

Bonjour,

Chez moi, votre code marche mais prend la date en anglais avec Array(1

ce code donne le "bon" resultat, du moins chez mois (Excel2013).

Sub Macro1()
    ActiveSheet.Range("$C$4:$F$10").AutoFilter Field:=2, Operator:= _
        xlFilterValues, Criteria2:=Array(2, "1/1/2020")
End Sub

eriiic · Answer

Bonjour,

il semble qu'il y ait un soucis avec cette fonction Autofilter depuis mi-août (dû à une mise à jour ?)
Ca se manifeste sur les versions 365 et 2019.
Pas vu de palliatif pour l'instant, plus qu'à espérer une correction rapide...
eric

Alex1857 · Answer

Bonjour,

Merci pour vos réponses.

Eric, comment savez-vous cela ? Quelles sont vous sources ?
Cela me permettra de savoir lorsque ce sera corrigé...

Merci d'avance

Alex1857 · Answer

Je vois merci...

On espère donc une correction rapide..

Bonne journée !

VBA - Macro Filtre automatique - Erreur 1004

4 réponses

Discussions similaires

Newsletters