Discussion :

[ZeeKinio]

Bonjour, je reviens vous voir car j'ai un petit probleme voila j'ai utiliser un code pour copier des données par rapport a une base de donnée ! J'ai utiliser sur une premiere feuille et sans probleme je l'utilise sur une autre feuille en modifiant bien les cellules a prendre en compte etc mais rien j'ai un message " La méthode advancedFilter de la classe Range à échouer " . Voici le code et le fichier

Code :

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

1
2
3
4
5
6
7
8
9
 
Private Sub Worksheet_Change(ByVal Target As Range)
    If Target.Address(False, False) = "G3" Then
        Sheets("Feuil2").[A9:Z1000].AdvancedFilter Action:=xlFilterCopy, _
            CriteriaRange:=[G2;G3], CopyToRange:=[A9:Z9]
 
 
    End If
End Sub

Classeur1.xlsm

[joe.levrai]

Bonjour,

Code :

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

CriteriaRange:=[G2;G3]

y'a rien qui te choque dans la façon de spécifier cette plage ?

[ZeeKinio]

JE viens de changer mais maintenant j'ai une erreur "le nom de champ est incorrect ou manquant dans la zone d'extraction", alors que le code marche tres bien sur l'autre page ... JE ne comprend pas

[joe.levrai]

tu as un des titres de tes colonnes en ligne 9 qui doit être différent des colonnes de ta feuille de données source

[ZeeKinio]

Dans la colonne G2 j'ai bien entrer Nom mais il est de la meme couleur que le fond on le voit pas c'est normal

[joe.levrai]

j'ai édité mon message, après avoir vu que c'était ta plage d'extraction qui était impactée, et pas ta plage de critère

pour ne pas passer 200 posts à comprendre, j'ai ouvert ton fichier

déjà, impossible de tester car ta feuille est protégée

ensuite, je vois que tes plages horaires disposent chacune d'un nom dans Feuil2
or dans la feuille CLIENT, ces titres sont devenus des cellules fusionnées avec des noms totalement différents