Bonjour,

J’ai les cellules de mon ficher source A77: D101 qui doivent aller en fichier cible en A36: D60

Avec ce code le renvoi ce fait bien mais pas en A36: D60 :
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
Dim cellule As Range
    For Each cellule In wssource.Range("A77:D101").Cells
        wsCIBLE.Range(cellule.Address) = cellule.Value
    Next
Avec ce code le renvoi ce fait bien en A36: D60 mais il y a juste la valeur A36 et D60 qui correspondent au fichier source.
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
Dim cellule As Range
    For Each cellule In wssource.Range("A77:D101").Cells
        wsCIBLE.Range("A36:D60") = cellule.Value
    Next
Je dois pas être bien loin de ce qui je veux, je suis novice. Merci de votre aide

Bonne semaine à vous.