Collage et division par 1000

bonjour,

comment on fait pour coller une valeur et la diviser par 1000 ?

j'utilise ceci, il me donne la valeur, je veux que l'action de coller la valeur divise automatiquement par 1000.

".Cells(65535, 3).End(xlUp)(2).PasteSpecial Paste:=xlPasteValues"

Merciiii

Bonsoir,

Si l'objectif est de récupérer la valeur, peut être comme ça en adaptant la cellule source ici surlignée :

Cells(Rows.Count, 3).End(xlUp)(2) = ActiveCell/ 10000

merci