Bonjour,

J'effectue la copie d'un fichier excel vers un autre, mais j'ai un problème le format des cellules n'est pas copié avec par exemple pour les dates, il apparaît des nombres dans certaines des cellules.

Voici ce que j'utilise :

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
Range(Range("A1"), Range("A1").SpecialCells(xlLastCell)).Copy
EspaceTravail.Activate
DestCell.PasteSpecial Paste:=xlValues
j'ai aussi essayé ça :
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
Range(Range("A1"), Range("A1").SpecialCells(xlLastCell)).Copy
EspaceTravail.Activate
DestCell.PasteSpecial Paste:=xlFormats
mais il ne prend pas que les formats et pas les formules et cette fonction ne fonctionne pas sur excel 2007 alors que Excel 2007 est la version utilisée au boulot.

Merci d'avance pour votre aide