vba excel translation des données d'une feuille à l'autre

Bonsoir,
j'ai deux feuilles sur excel, une nommée "données" et l'autre nommée "table".
Sur la première feuille j'ai des valeurs que j'aimerais envoyer sur l'autre feuille "table" par exemple sur la feuille "données" en colonne A j'ai les noms de communes ça cela ne bougeras pas et resteras en colonne A sur la feuille "table" par contre sur la feuille "données" en colonne B j'ai des adresses que j'aimerais faire passer sur la feuille "table" mais en colonne D.
J'espere que quelqu'un pourras m'aider et dans l'attente d'une réponse je vous remercie et vous souhaite une bonne soirée.

Pierre

Bonsoir,

Je voudrai bien, mais je ne comprends absolument pas.
La ponctuation peut aider, car là tout est mélangé.

JP

desolé!!
j'ai deux feuilles sur excel, une nommée "données" et l'autre nommée "table".
Sur la première feuille, j'ai des valeurs que j'aimerais envoyer sur l'autre feuille "table".
Par exemple sur la feuille "données", en colonne A, j'ai les noms de communes ça cela ne bougeras pas et resteras en colonne A sur la feuille "table".
Par contre sur la feuille "données", en colonne B j'ai des adresses que j'aimerais faire passer sur la feuille "table" mais en colonne D.
J'espère que quelqu'un pourras m'aider et dans l'attente d'une réponse je vous remercie et vous souhaite une bonne soirée.
http://C:\Documents and Settings\Sylwaen\Bureau

Bonsoir,

J'arrive enfin à me connecter

Si j'ai bien compris votre souhait

Code:

---

1 2 3 4 5 6 7 8

Sub Macro1() Worksheets("données").Range([A1], [A1].End(xlDown)).Copy _ Destination:=Worksheets("table").Range("A1")   Worksheets("données").Range([B1], [B1].End(xlDown)).Copy _ Destination:=Worksheets("table").Range("D1")   End Sub

---

Oui merci pour la rapidité, c'est exactement ça !! mais dans mes données j'ai des cases sans valeurs donc j'aimerais savoir si on peux arranger ça!
parce que le traitement s'arrête à la première case sans valeur!

Encore merci et bon week end

Code:

---

1 2 3 4

Sub Macro1() sheets("données").Range("A:A").Copy sheets("table").Range("A1") sheets("données").Range("B:B").Copy sheets("table").Range("D1") End Sub

---

Merci beaucoup et dernier petit detail apres j'arrete promis...lol
la copie marche super bien mais pour la colonne A les nom des communes comporte juste apres le type de contrat.
Ca ce presente comme ça nom commune : AUROS (ES) et j'aimerais copier que le nom de la commune dans l'autre page.

Encore merci!!

Citation:

---

Merci beaucoup et dernier petit detail apres j'arrete promis...lol

---

Personne ne te demande d'arrêter;
Je propose que tu ouvre un nouveau sujet où tu relate clairement le problème que tu rencontres. Vu ton sujet initial, c'est résolu