En fait j'ai détourné le problème en sélectionnant à la main toute la zone qui m'interesse. C'est un peu lourd mais je n'ai pas sû comment faire autrement...
Voici la gueule de ma macro :
Sheets("Liste BV" ).Select
Selection.AutoFilter Field:=1, Criteria1:="3"
Range("C2" ).Select
ActiveCell.Offset(0,1).Select
Range(Selection, Selection.End(xlToRight)).Select
Range(Selection, Selection.End(xlDown)).Select
Application.CutCopyMode = False
Selection.Copy
Sheets("BV versés" ).Select
Range("C19" ).Select
Selection.PasteSpecial Paste:=xlPasteAllExceptBorders, Operation:=xlNone, _
SkipBlanks:=False, Transpose:=False