Copier seulement les valeurs des cellules sans les formules

Bonjours tous le monde,

J'essaye de copier coller des valeurs d'une feuille vers une autre sans prendre les formules contenus dans celles-ci.

Actuellement ma macro est écrit de cette façon mais elle copie aussi les formules:

Sheets("Feuil1").Select

Range("K1").Select

Range(Selection, Selection.End(xlDown)).Select

Selection.Copy Destination:=ThisWorkbook.Sheets("Feuil2").Range("C1")

Que faut'il rajouter pour copier uniquement le contenu des cellules ?

Merci d'avance.

Bonjour

Sans trop te compliquer, l'enregistreur de macro te donnera la réponse avec un copier collage spécial valeurs

Cordialement

Amadéus a écrit :

Bonjour

Sans trop te compliquer, l'enregistreur de macro te donnera la réponse avec un copier collage spécial valeurs

Cordialement

Si je poste sur le forum, c'est que l'enregistreur de macro n'a pas répondu à ma question.

L'enregistreur écrit des codes basiques qui font ralentir le programme. Il va me faire un select case puis copy puis past special ...

J'essaye de ne plus utiliser l'enregistreur de macro et d'apprendre des méthodes de codage plus efficace.

Mon objectif est de pouvoir changer le code que j'ai écris qui est plus rapide que celui crée par l'enregistreur de macro.

En attente d'autre réponse, merci d'avance.

Bonjour

Bon, alors, pour faire court, fait comme cela:

Sub Copier()
Sheets(1).Range("K1", Range("K1").End(xlDown)).Copy
Sheets("Feuil2").Range("C1").PasteSpecial Paste:=xlPasteValues
End Sub

Cordialement

Merci.

Impossible

Les enregistrement sont obligatoires sous cette forme

Rechercher des sujets similaires à "copier seulement valeurs formules"