pb avec autofilter

Bonjour à tous, je suis nouveau,

J'ai un soucis avec un prog que j'ai créée sous excel 2007 et qui m'indique une erreur sous excel2000 et excel2003 (err1004 methode autofilter de la classe range a échoué)

Il s'agit d'un tri dans une matrice sur la colonne 8qui comporte des noms de clients. J'exclue les clients només "clientA" à "ClientM" et j'affiche le "clientP"

Voici mon code:


Private Sub CommandButton1_Click()

Worksheets("Visualisation").Activate
Sheets("Visualisation").Range("B13:k250").ClearContents
Sheets("ST3").Range("B19:k220").Copy
Sheets("Visualisation").Select
Sheets("Visualisation").Range("B13:k214").Select
Sheets("Visualisation").Paste
Sheets("Visualisation").Range("B13:k214").Select
Selection.AutoFilter
Sheets("Visualisation").Range("$B$13:$k$214").AutoFilter field:=8, Criteria1:=Array( _
"ClientA", "ClientB", "ClientC", "ClientD", _
"ClientE", "ClientF", "ClientG", "ClientH", "ClientI", _
"ClientJ", "ClientK", "ClientL", "ClientM", "="), Operator _
:=xlFilterValues


Sheets("Visualisation").Range("$B$13:$k$214").AutoFilter _
field:=8, _
Criteria1:="ClientP"
VisibleDropDown = True
End Sub

Quelqu'un aurait une solution pour éviter cette erreur sous excel2000 et excel 2003