Voila , je voudrais copier des données provenant de la feuille frs(ok) vers la feuille ("cpte resultat") en c20:h20 suivant les critères qui sont en b11:e12 de la feuille "cpte resultat"
C'est pour voir si cela parait bon? le code
Sub FiltreMixte()
Sheets("frs(ok)").Activate
Range("A4465000").AdvancedFilter Action:=xlFilterCopy, criteriarange:=Sheets("cpte resultat").Range( _
"b11:e12"), copytorange:=Sheets("cpte resultat").Range("c20:h20"), unique:=False
Sheets("cpte resultat").Select
Range("b5").Select
End Sub
Merci!
C'est pour voir si cela parait bon? le code
Sub FiltreMixte()
Sheets("frs(ok)").Activate
Range("A4465000").AdvancedFilter Action:=xlFilterCopy, criteriarange:=Sheets("cpte resultat").Range( _
"b11:e12"), copytorange:=Sheets("cpte resultat").Range("c20:h20"), unique:=False
Sheets("cpte resultat").Select
Range("b5").Select
End Sub
Merci!