macro coller valeur

[guiguik]

bonjour,

je suis sous excel 2007 et je souhaite effectuer un coller valeur avec une macro. mon problème est que je n'y arrive pas, la macro plante et message d'erreur...


voila la macro :

Workbooks.Open ("C:\Documents and Settings\FNP Interim\Maquette Ajaccio.xls")
Sheets("RECA facturé").Select
Range(Cells(40, 5), Cells(42, 6)).Copy
ActiveWorkbook.Close SaveChanges:=False

Sheets("conso").Select
Range(Cells(2, 5), Cells(4, 6)).Select
ActiveSheet.PasteSpecial xlPasteValues
ActiveWorkbook.Save

pouvez-vous m'aider?

Merci!

 

[wilfried_42]

Re : macro coller valeur

Bonjour

l'action de fermeture du classeur doit etre le probleme, non testé, à essayer

Workbooks.Open ("C:\Documents and Settings\FNP Interim\Maquette Ajaccio.xls")
Sheets("RECA facturé").Range(Cells(40, 5), Cells(42, 6)).Copy
Workbooks(1).select
Sheets("conso").Range(Cells(2, 5), Cells(4, 6)).paste PasteSpecial (xlValues)
Workbooks(2).Close SaveChanges:=False
ActiveWorkbook.Save