Bonjour,

je suis désolé de vous déranger avecune question qui parait aussi basique mais je n'arrive pas à copier le contenu d'une cellule sachant que c'est une valeur vers une autre. J'ai essayé :

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
Dim Valeur as string
Dim Cel as Range
Dim Cel2 as Range
Valeur=Cel.Offset(i,1).Value
Cel2.Offset(Compteur2,21).Value=Valeur
mais aussi

Code : Sélectionner tout - Visualiser dans une fenêtre à part
Cel.Offset(i,1).Copy Cel2.Offset(Compteur2,21)
Idir