Bonjour, Il faut passer par une macro du style sub Filtre() Range("A6:C1002").AdvancedFilter Action:=xlFilterCopy, CriteriaRange:=Range _ ("A1:C3"), CopyToRange:=Range("J6"), Unique:úlse End sub qui devra etre déclenchée par un évennement sur la feuille contenant la base de données mère (ou par un bouton) comme par exemple : Private Sub Worksheet_Calculate()
End Sub
Philippe NOSS www.exefac.com
Bonjour,
Il faut passer par une macro du style
sub Filtre()
Range("A6:C1002").AdvancedFilter Action:=xlFilterCopy,
CriteriaRange:=Range _
("A1:C3"), CopyToRange:=Range("J6"), Unique:=False
End sub
qui devra etre déclenchée par un évennement sur la feuille contenant
la base de données mère (ou par un bouton) comme par exemple :
Private Sub Worksheet_Calculate()
Bonjour, Il faut passer par une macro du style sub Filtre() Range("A6:C1002").AdvancedFilter Action:=xlFilterCopy, CriteriaRange:=Range _ ("A1:C3"), CopyToRange:=Range("J6"), Unique:úlse End sub qui devra etre déclenchée par un évennement sur la feuille contenant la base de données mère (ou par un bouton) comme par exemple : Private Sub Worksheet_Calculate()