Bonjour à tous,
Grotsblues,
Essaye de supprimer simplement le 2ème critères:
, Operator:=xlAnd, Criteria2:=Format("mm/dd/yyyy")
La macro sera donc:
Sub Macro7()
ActiveSheet.Range("$A$1:$C$5").AutoFilter Field:=3, Criteria1:=InputBox("Saisir la date concernée")
End Sub
Gaël