changement d'orientation

Jiheme

XLDnaute Accro

• 25 Juillet 2009

• #2

Re : changement d'orientation

Bonjour Alexenglebert, re à tous

Tu sélectionne ton horizontale tu fais copier, tu sélectionne la verticale et colage spécial, tu coches "transposé" et tu valides.

A+

 

Vote positif 0 Vote négatif

A

alexenglebert

XLDnaute Nouveau

• 25 Juillet 2009

• #3

Re : changement d'orientation

parfait merci

 

Vote positif 0 Vote négatif

ROGER2327

XLDnaute Barbatruc

• 25 Juillet 2009

• #4

Re : changement d'orientation

Bonjour à tous

Une petite procédure pour faire la chose :

Code:

[COLOR="DarkSlateGray"]Sub Macro01()
Dim oDat, dDat, tDat
   Set oDat = Range("A1:E1") [COLOR="SeaGreen"]'à adapter aux besoins[/COLOR]
   tDat = oDat: oDat.Clear
   Set dDat = oDat.Cells(1, 1).Resize(oDat.Columns.Count, oDat.Rows.Count)
   dDat.Value = Application.Transpose(tDat)
   dDat.Select
End Sub[/COLOR]

Bonne journée.
ROGER2327

 

Vote positif 0 Vote négatif

H

hoerwind

XLDnaute Barbatruc

• 25 Juillet 2009

• #5

Re : changement d'orientation

Bonjour,

Pour être complet, la même chose par formule :

A2 : =INDIRECT(CAR(64+LIGNE())&1)
formule à copier vers le bas.

 

Vote positif 0 Vote négatif

ROGER2327

XLDnaute Barbatruc

• 25 Juillet 2009

• #6

Re : changement d'orientation

Re...

Jiheme à dit:

Bonjour Alexenglebert, re à tous

Tu sélectionne ton horizontale tu fais copier, tu sélectionne la verticale et colage spécial, tu coches "transposé" et tu valides.

A+

Cliquez pour agrandir...

Bonjour Jiheme
En faisant ça avec les plages A1:E1 et A1:A5, j'obtiens un message d'erreur dû au recouvrement partiel des deux plages.​

ROGER2327

 

Vote positif 0 Vote négatif

Jiheme

XLDnaute Accro

• 25 Juillet 2009

• #7

Re : changement d'orientation

Bonjour à tous

Exact Roger, moi aussi, j'ai ommis de préciser dans ma réponse de le faire en A2 et de supprimer la ligne 1 ou encore d'effacer A1 et de remonter le tout, cette solution n'a d'intérêt que si cette manip est ponctuelle, la tienne et celle d'Hoerwind sont beaucoup plus pratiques en cas de manoeuvres répétitives.

Bon WE à tous

A+

 

Vote positif 0 Vote négatif