Bonjour à tous,
Je cherche à établir un filtre selon les valeurs de plusieurs cellules. Le soucis c'est que ma source à filtrer est faite de formule et non de valeur (Feuille DATA).
Quand les données sont stockées "classiquement" aucun soucis mon code fonctionne.
	
	
	
	
	
		
Ya t-il un moyen d'y remedier ?
Bonne soirée à tous
Christophe
	
		
			
		
		
	
				
			Je cherche à établir un filtre selon les valeurs de plusieurs cellules. Le soucis c'est que ma source à filtrer est faite de formule et non de valeur (Feuille DATA).
Quand les données sont stockées "classiquement" aucun soucis mon code fonctionne.
		Code:
	
	
	Private Sub Worksheet_Change(ByVal Target As Range) 
  If Target.Address = "$B$8" Or Target.Address = "$C$8" Or Target.Address = "$D$8" Then 'critère
  Range([B10], Range("U" & [B10].End(xlDown).Row)).Clear
    Sheets("DATA").Range("A1:T4000").AdvancedFilter Action:=xlFilterCopy, _ 'feuille source
      criteriaRange:=ActiveSheet.Range("B7:D8"), CopyToRange:=ActiveSheet.Range("B10"), Unique:=False
  End If
End Sub
	Ya t-il un moyen d'y remedier ?
Bonne soirée à tous
Christophe