problème de guillemets

[torg59]

Voilà je voudrais utiliser ces deux lignes de codes:

piece = Sheets("édition OF").Cells(5, 11)
...
Selection.AutoFilter Field:=11, Criteria1:="=*piece*"

Mais mon problème est que ma première ligne me retourne une valeur entre guillemets (par exemple: "porte")
et que la deuxième ligne veut un argumant sans guillemets. En gros si la valeur de cells(5, 11) est porte mon code lui retourne:
Selection.AutoFilter Field:=11, Criteria1:="=*"porte"*" au lieu de Selection.AutoFilter Field:=11, Criteria1:="=*porte*"
et il aime pas ça!

Est ce quelqu'un peut m'aider???
Merci

 

[porcinet82]

Re : problème de guillemets

Salut,

Sans tester, mais il me semble qu'il faut mettre un truc de ce genre :
piece = Sheets("édition OF").Cells(5, 11)
...
Selection.AutoFilter Field:=11, Criteria1:=piece
@+

 

[Pierrot93]

Re : problème de guillemets

Bonjour Torg, Romain

Par contre si tu veux l'équivalent de "contient", tu peux essayer le code ci-dessous :

    Selection.AutoFilter Field:=1, Criteria1:="=*" & piece & "*"

bon après midi
@+

 

[torg59]

Re : problème de guillemets

Merci à tous les deux

Mon problème est résolu. J'ai essayé avec :
Selection.AutoFilter Field:=5, Criteria1:="=*" & piece & "*"

et ca marche nickel
A bientôt