Copier la nouvelle valeur d'une cellule

If Selection.Column = 1 Then

Calculate

ActiveCell.Offset(0, 1) = ActiveCell

End If

Je voudrais automatiser un Ctrl+C sur la cellule de destination. (Résultat de cette commande)

Merci

Bonsoir,

çà fait le 3ème ou 4ème poste que tu ouvre avec ce bout de code !

que veux-tu faire exactement ?

Envoie une feuille avec un exemple du résultat attendu.

Amicalement

Claude

J'y peux rien, il y a toujours une nouvelle demande qui se rajoute lorsque je réussis à faire quelque chose... mais bon pour le moment, laisser tomber...

Merci quand même.