variable dans levariable dans le Filtrer /filtres textuels /contient

variable dans levariable dans le Filtrer /filtres textuels /contient - VB/VBA/VBS - Programmation

Marsh Posté le 09-04-2014 à 09:59:48    

je n'arrive pas dans VBA à placer une VARIABLE dans variable dans le Filtrer /filtres textuels /contient :
 
Formule avec l'enregistreur de macro :
'    ActiveWindow.SmallScroll Down:=-192
'    ActiveSheet.Range("$A$1:$I$2690" ).AutoFilter Field:=5, Criteria1:= _
'        "=*VARIABLE*", Operator:=xlAnd
 
mon cas :
For LignesFam_Mark = 1 To 38
    Set Fam_Mark = Sheets("FamMark" ).Range("A" & LignesFam_Mark)
    Fam_Mark.Copy
    Sheets("BT - filiale EURO" ).Select
    ActiveWindow.SmallScroll Down:=-192
    ActiveSheet.Range("$A$1:$I$2690" ).AutoFilter Field:=5, Criteria1:= _
        "=*Fam_Mark*", Operator:=xlAnd
 
Merci d'avance à m'aider à placer la variable.

Reply

Marsh Posté le 09-04-2014 à 09:59:48   

Reply

Marsh Posté le 09-04-2014 à 10:40:02    

Pourtant tu as réussi à le faire ici...
 

Code :
  1. Range("A" & LignesFam_Mark)

Reply

Marsh Posté le 10-04-2014 à 09:09:04    

la solution pour mettre une variable dans le filtre contextuel estest :
"=*" & Fam_Mark & "*", Operator:=xlAnd
 
Par contre si la valeur est correcte et stocker dans le filtre, la ligne résultat ne s'affiche pas, il garde la valeur mais sans afficher le résultat.
pouvez vous m'aider ?
Merci d'avance

Reply

Sujets relatifs:

Leave a Replay

Make sure you enter the(*)required information where indicate.HTML code is not allowed