vba acces automation pb copier coller

Bonjour,
je voudrais savoir ce qu'il cloche dans mon code il arrete pas de me mettre que ma méthode paste a échoué
En fait j'essai de copier des données d'une feuille a ue autre mais en copiant les données et non les formules

Code:

---

1 2 3 4 5

xls.Workbooks("e_analyse_croisée_Test.xls").Worksheets("R_analyse_croisée").Range("G9:H9").Copy xls.ActiveWindow.TabRatio = 0.265 xls.Application.CutCopyMode = False xls.Workbooks("e_analyse_croisée_Test.xls").Sheets("Feuil1").Range("B7:C7").Select xls.Workbooks("e_analyse_croisée_Test.xls").Sheets("Feuil1").Paste

---

voici la solution

Code:

---

xls.Workbooks("e_analyse_croisée_Test.xls").Sheets("Feuil1").Range("B7:C7").Value = xls.Workbooks("e_analyse_croisée_Test.xls").Worksheets("R_analyse_croisée").Range("G9:H9").Value

---