J'ai pourtant l'impression de faire tout comme il faut mais j'obtiens cette erreur sur la ligne concernant AutoFilter :

Erreur 1004 : une plage est requise, selectionnez au moins une cellule dans une plage
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
Dim Services As Worksheet
Set Services = ThisWorkbook.Worksheets(1)
Dim allcells As Range
Set allcells = Services.Range("A6:O500")
allcells.AutoFilter
Any help?