Bonjour à toutes et à tous,
J'ai un problème pour procéder à un filtre multicritères avec le code ci-dessous
L'objectif est de ne retenir à l'affichage que les valeurs qui respectent les 2 critères
Le premier critère est l'identifiant id
Le second critère c'est la valeur maximum trouvée en colonne G
L'erreur que j'obtiens est : "Impossible de lire la propriété Large de la classe WorksheetFunction"
Je sollicite donc votre aide pour solutionner ce problème qui me cause de sérieux soucis.
J'ai un problème pour procéder à un filtre multicritères avec le code ci-dessous
L'objectif est de ne retenir à l'affichage que les valeurs qui respectent les 2 critères
Le premier critère est l'identifiant id
Le second critère c'est la valeur maximum trouvée en colonne G
Code:
dl = .Cells(Application.Rows.Count, 1).End(xlUp).row 'définit la dernière ligne éditée dl de la colonne 1 (=A) de l'onglet
Set pl = .Range("A2:G" & dl) 'définit la plage pl
.Range("A1").AutoFilter 'lance le filtre automatique sur la colonne A
.Range("A1").AutoFilter Field:=1, Criteria1:=id 'filtre la colonne 1 avec la valeur id comme critère (identifiant)
.Range("G1").AutoFilter 'lance le filtre automatique sur la colonne G
.Range("G1").AutoFilter , Field:=6, Criteria1:=Application.WorksheetFunction.Large(Columns(6), 1)
'la dernière ligne devrait filtrer la colonne G avec la valeur maximum trouvée en colonne G
L'erreur que j'obtiens est : "Impossible de lire la propriété Large de la classe WorksheetFunction"
Je sollicite donc votre aide pour solutionner ce problème qui me cause de sérieux soucis.
Dernière édition: