VBA MACRO DONNER DANS UNE SEUL COLLONNE

jeremy6812 · 25 Septembre 2017

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) · 25 Septembre 2017

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

VB:

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 · 26 Septembre 2017

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

VBA MACRO DONNER DANS UNE SEUL COLLONNE

jeremy6812

Guest

Pièces jointes

youky(BJ)

XLDnaute Barbatruc

jeremy6812

Guest

Discussions similaires

VBA MACRO DONNER DANS UNE SEUL COLLONNE

jeremy6812

Guest

Pièces jointes

youky(BJ)

XLDnaute Barbatruc

jeremy6812

Guest

Discussions similaires

Privacy & Transparency

Privacy & Transparency