transformer texte en VBA

Bonjour,
tu peux essayer cela

sub copier()
if range("c2").value = "" then exit sub
Range("H2:H4").Select
Selection.Copy
Range("C6").Select
ActiveSheet.Paste
end sub

A+
Eric

Un grand merci !
me voila soulager, je vais pouvoir continuer mon travail...

cordialement Jean

RE

Pour info, pour générer des codes type sélection de zone, copier, coller, j'utilise l'enregistreur de macro (outils-macros-nouvelle macro) et ensuite je vais regarder sous vba le code généré.

cela permet de l'auto-apprentissage, ce qui reste quand même plus rapide que la recherche dan sdes docs ou sur forum

bonne continuation

Eric