bonjour,
parce que vos données sont un tableau, range("T_Source") n'est que le "databodyrange" = la plage avec les données sauf les entêtes
Alors, la plage avec les entêtes sera Range("T_source").ListObject.Range (ajouter ".Listobject" pour s'addresser au tableau et ".range" pour entête&données)
Sub Copier_coller()
'
' Copier_coller Macro'
Range("T_source").ListObject.Range.AdvancedFilter Action:=xlFilterCopy, CriteriaRange:=Range("Z2:Z3"), CopyToRange:=Range("AB2:AR2"), Unique:=False
End Sub