Référence de cellule dans une macro Résolu/Fermé

Question

Bonjour, 

j'ai une macro pour filtrer mes infos de mon tableau comme ci-desous
    
Sheets("Fichier principal").Select
    ActiveSheet.Range("$A$1:$O$386").AutoFilter Field:=5, Criteria1:="1"
    ActiveSheet.Range("$A$1:$O$386").AutoFilter Field:=6, Criteria1:="<>"

Je voudrais que le Criteria1 fasse référence à une cellule d'une autre feuille dans laquelle je pourrai y mettre les autres critères. Par exemple 2 ou 3 ou 4. Ainsi il pourrait effectuer les filtres en fonction de ma cellule de référence.
Suis-je clair !!!
Merci de votre aide précieuse

Configuration: Windows 7 / Chrome 25.0.1364.172

dlt-pan · Answer

Bonjour
si j'ai bien compris :
autre feuille avec nom onglet "feuil2" et emplacement du critère en A1

dim crit as string
sheets("feuil2").activate
crit=cells(1,1)
Sheets("Fichier principal").activate 
ActiveSheet.Range("$A$1:$O$386").AutoFilter Field:=5, Criteria1:= crit

mchotard · Answer

parfait, tu as tout compris et tes explications sont claires et nette. Ca marche et j'en suis ravi.
A+ et merci

Référence de cellule dans une macro

2 réponses

Discussions similaires