VBA MACRO DONNER DANS UNE SEUL COLLONNE

[jeremy6812]

Bonjour à tous 🙂

Tous d'abord merci pour votre aide et les nombreuses solutions que j ai déjà trouver en parcourant ce forum 🙂

Mais la je bloque

je souhaiterais une macro qui prend tous les donnés de la feuille 1 joint et et inséré dans une nouvelle feuilles ( feuille 2) , mais le tous dans une seul et mémé colonne ( colonne A )est ce possible?

si oui merci pour votre aide

 

[youky(BJ)]

Bonjour Jérémy,
Voici une macro, verifie que ton onglet est le CodeName Feuil1 (voir en fenêtre projet)
Bruno

Sub EnColonne()
haut = 4
'Feuil1 est le codeName de l'onglet et non son name
bout = Feuil1.[B4].End(xlToRight).Column
Sheets.Add After:=Sheets(Sheets.Count)
With Sheets(Sheets.Count)
For col = 2 To bout
bas = Feuil1.Cells(65536, col).End(3).Row
For lig = 4 To bas
k = k + 1
.Cells(k, 1) = Feuil1.Cells(lig, col)
Next
Next
End With
End Sub

 

[jeremy6812]

super c'est parfait je te dit un grand merci pour tous le temps que je vais gagner merci et merci beaucoups 🙂