Superposer plusieurs colonnes sous une même plage de colonnes

Gabbi -  
 gabbi -
Bonjour,

J'ai un fichier avec une 60aine de colonnes, qui se structure de la façon suivante:
>> colonne A à E : client/date commande/ produit / quantité de la semaine x
>> colonne F à J : client/date commande/ produit / quantité de la semaine y...

Je souhaiterais que toutes les infos soient contenues dans la plage de colonne A:E et donc superposer les colonnes F:J / K:0... sous la colonne A:E.

J'ai très peu de notions en vba, mais en faisant des recherches je suis tombée sur cette macro qui me permet de superposer plusieurs colonnes en une seule. Mais comment faire pour superposer des plages de colonnes? (j'ai essayé d'insérer un step, mais je tombe sur une erreur):


Dim MaPlage As Range, cmpt As Long

Set MaPlage = Columns("A:F").SpecialCells(xlCellTypeBlanks)
'vire les cellules vides
MaPlage.Delete xlUp
'remonte toute les valeurs sur la première colonne
Set MaPlage = Columns("A:A")
For cmpt = 1 To 5
MaPlage.Offset(, cmpt).SpecialCells(xlCellTypeConstants).Copy Destination:=MaPlage.End(xlDown).Offset(1)
Next

Columns("B:F").ClearContents


Merci par avance pour votre aide!

2 réponses

Gyrus Messages postés 3334 Date d'inscription   Statut Membre Dernière intervention   526
 
Bonjour,

Une solution à tester
https://www.cjoint.com/c/CKdhzGp6wsw

A+
0
gabbi
 
Merci, génial, cela marche parfaitement!!

Très bonne soirée:)
0