XL 2016 Mise en forme colonnes

baptiste76220

XLDnaute Nouveau
Bonjours à tous,

Je souhaiterai automatiser une action assez simple qui me prend pas mal de temps à la main.
J'ai différentes colonnes avec des valeurs et je souhaiterai que ces valeurs se mettent les une après les autres à la suite dans une seule colonne.
Voir fichier ci-joint pour exemple.
Merci d'avance
 

Pièces jointes

  • Exemple.xlsx
    11.8 KB · Affichages: 6

mapomme

XLDnaute Barbatruc
Supporter XLD
Bonjour @baptiste76220, @JBARBE :),

Avec une petite macro. La plage en entrée et la colonne en sortie peuvent se trouver sur des feuilles différentes. le code est dans module1.
Code:
Sub UneColonne()
Dim rgIn As Range, rgOut As Range, i&

On Error Resume Next
Set rgIn = Application.InputBox("Sélectionnez la plage à traiter SVP", _
               "Plage à 'déplier' :", Type:=8)
If rgIn Is Nothing Then Exit Sub
Set rgOut = Application.InputBox("Sélectionnez la cellule destination SVP", _
               "Vers la cellule :", Type:=8)
If rgOut Is Nothing Then Exit Sub
On Error GoTo 0

With rgOut.Parent
   .Range(rgOut, .Cells(Rows.Count, rgOut.Column)).ClearContents
   For i = 1 To rgIn.Columns.Count
      rgIn.Columns(i).Copy rgOut.Offset(rgIn.Rows.Count * (i - 1))
   Next i
   .Select
End With
End Sub
 

Pièces jointes

  • baptiste76220- Exemple- v1.xlsm
    19.7 KB · Affichages: 5

mapomme

XLDnaute Barbatruc
Supporter XLD
Merci pour cette solution, mais imaginons que j'ai des milliers de valeurs variables sur des dizaines de colonnes... Cette solution n'est pas très pratique parce qu'il faut que je descende manuellement à chaque fois non ?

On pourrait le faire de façon entièrement automatique mais il faudrait disposer de la structure exacte du fichier concerné ce qui ne semble pas être le cas pour le fichier exemple...
 

JBARBE

XLDnaute Barbatruc
Re,

Merci pour cette solution, mais imaginons que j'ai des milliers de valeurs variables sur des dizaines de colonnes... Cette solution n'est pas très pratique parce qu'il faut que je descende manuellement à chaque fois non ?

Cdlt
Bonjour mapomme !
Ma solution était trop simpliste compte tenu de ne pas avoir le fichier intégral, et comme le dit mapomme :
il faudrait disposer de la structure exacte du fichier concerné ce qui ne semble pas être le cas pour le fichier exemple...
Bonne journée !
 

Discussions similaires

Statistiques des forums

Discussions
312 370
Messages
2 087 678
Membres
103 635
dernier inscrit
aime nguessanj