Re : macro et advanced filter
Pas très propre, j'espère que cela te sera lisible
' Food_beverage Macro
'
'
Range("Init").AdvancedFilter Action:=xlFilterCopy, CriteriaRange:=Sheets( _
"Initial Data").Range("B23:B24"), CopyToRange:=Range("A1:F11"), Unique:= _
False...