VBA - Macro Filtre automatique - Erreur 1004
Résolu
Alex1857
Messages postés
13
Date d'inscription
Statut
Membre
Dernière intervention
-
Alex1857 Messages postés 13 Date d'inscription Statut Membre Dernière intervention -
Alex1857 Messages postés 13 Date d'inscription Statut Membre Dernière intervention -
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 ...
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 !
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 !
A voir également:
- La méthode autofilter de la classe range a échoué
- Photo filtre 7 gratuit - Télécharger - Retouche d'image
- Réponse automatique thunderbird - Guide
- Telecharger macro convertir chiffre en lettre excel - Télécharger - Tableur
- Logiciel de sauvegarde automatique gratuit - Guide
- Filtre whatsapp - Accueil - Messagerie instantanée
4 réponses
Bonjour,
Chez moi, votre code marche mais prend la date en anglais avec
ce code donne le "bon" resultat, du moins chez mois (Excel2013).
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
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
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
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
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
Vu sur différents forums, et constaté sur ma version 2019 64 bits.
Par exemple :
https://forum.excel-pratique.com/excel/autofilter-ne-fonctionne-plus-145644
https://www.excel-downloads.com/threads/vba-erreur-1004-sur-filtre-automatique-feuille-non-protegee.20048807/
Pas vu de comm coté MS
eric
Par exemple :
https://forum.excel-pratique.com/excel/autofilter-ne-fonctionne-plus-145644
https://www.excel-downloads.com/threads/vba-erreur-1004-sur-filtre-automatique-feuille-non-protegee.20048807/
Pas vu de comm coté MS
eric