[VBA-E]Transformer colonne en ligne

Bonjour à tous!

je m'explique:
1) j'ai une colonne avec une valeur numérique dans chaque cellule
2) je voudrais faire un programme qui écrirait la valeur de ces cellules mais en ligne : en gros transformer cette colonne en ligne
3) effacer la derniere valeur sur chaque ligne

J'ai essayé While...Wend mais ça tourne en boucle tout le temps et impossible d'ecrire une autre valeur dans les cases que la première.

Un petit coup de main les gars??? :oops:

Tu as ça dans Excel. Sélectionner les cellules -> Copier -> Sélection d'une cellule en dehors de la plage -> Collage spécial -> Transposé

Pour une macro faisant ça, tu enregistres en le faisant, après, on verra pour arranger ton code... :wink:

A+

voilà ce que ça me donne :

Code:

---

1 2 3 4 5 6 7 8 9 10 11 12 13

Sub Macro1() ' ' Macro1 Macro ' '   ' Range("A1:A20").Select Selection.Copy Range("B1").Select Selection.PasteSpecial Paste:=xlPasteAll, Operation:=xlNone, SkipBlanks:= _ False, Transpose:=True End Sub

---

Edit
Pour ton code, utilise les balises [Code] Sélection du code, un clic sur le bouton [code] et c'est fait. Et lis les règles du forum, c'est plein de bons conseils comme celui-ci. :wink:
Balises gentiment ajoutées par ouskel'n'or

Tu as un problème avec le code ?

A+