Besoin d'aide sur "Column"

Bonjour,

Voici un code (enfin une bidouille):

Code:

---

1 2 3

Worksheets("Courriers").Range("A1") = "ici mon texte" Worksheets("Courriers").Range("A2") = "ici mon texte" Worksheets("données").Columns(4).Value = Columns(7)

---

Les deux premieres lignes de codes fonctionnent mais la 3ème.
Je voudrais que la liste de nom dans la colonne D soit remplacer par la colonne G
Mais ça ne fonctionne pas !!
Comment puis-je faire ?

Merci pour votre aide.

Bonsoir,

Pour copier toute la colonne G dans la colonne D, tu peux faire

Code:

---

Sheets("données").Columns(7).Copy Sheets("données").Cells(1, 4)

---

Bonsoir,

Merci beaucoup:king:
Que ferais-je sans Developpez.com
Merci
:yaisse2: