Transfert cellule inter classeur

[David]

Bonjour à tous .

Voila ,j'ai des difficultés avec les Objets .Je n'arrive pas à transférer
des cellules depuis un Classeur GestComR06 ,feuille Devis vers un autre
classeur nommé HistDevis vers Feuil1 ,la formule suivante plante systématiquement :

Workbooks("HistDevis").Sheets("Feuil1").Range(Cells(j, 1), Cells(j, 1)).Value = _
Workbooks("GestComR06").Sheets("Devis").Range("G3").Value

Y a t'il quelque chose de plus simple pour transférer des cellules entre
classeurs.

Merci d'avance de votre coopération.

David

 

[Zon]

Salut;

Pourquoi utiliser 2 cells, il faut que tu es 2 plages de taille identique.


Workbooks("HistDevis").Sheets("Feuil1").Range("A"&J).Value = _
Workbooks("GestComR06").Sheets("Devis").Range("G3").Value

A+++