A tester :
Range("A3:AF" & LigneTotal).Copy.PasteSpecial Paste:=xlPasteValues ' On copie toutes les données de la feuille active
Pour ce qui est du format date, je sélectionnerai la ou les colonnes dans le fichier de destination et j'appliquerai le format date souhaité sur toute la colonne.