Compiler liste de plusieurs plages en une seule, sans cellule vide

Le
Cyril DUPONT
Bonjour à tous,

Voici ma question : J'ai 3 plages de valeurs différentes ("BC12:BC20"),
("C35:C39") et ("BC33:BC39") qui peuvent contenir, ou non, des données.
Ce que je souhaiterais c'est pouvoir les retrouver dans une seule colonne
("EN" par exemple) sans les cellules vides provenant des 3 plages

Exemple concret :

plage1 plage2 plage3 colonne"EN"

22222 111111 666666 222222
44444 44444
333333 1111111
333333
666666

Merci,

--Cyril--
Vidéos High-Tech et Jeu Vidéo
Téléchargements
Vos réponses
Gagnez chaque mois un abonnement Premium avec GNT : Inscrivez-vous !
Trier par : date / pertinence
Daniel.C
Le #4749031
Bonjour.
Esssaie :

Sub test()
Dim c As Range, Ctr As Long
Ctr = 1
For Each c In Union([BC12:BC20], [C35:C39], [BC33:BC39])
If c <> "" Then
Cells(Ctr, "EN") = c
Ctr = Ctr + 1
End If
Next c
End Sub

Cordialement.
Daniel
"Cyril DUPONT" message de news:

Bonjour à tous,

Voici ma question : J'ai 3 plages de valeurs différentes ("BC12:BC20"),
("C35:C39") et ("BC33:BC39") qui peuvent contenir, ou non, des données.
Ce que je souhaiterais c'est pouvoir les retrouver dans une seule colonne
("EN" par exemple) sans les cellules vides provenant des 3 plages...

Exemple concret :

plage1 plage2 plage3 colonne"EN"

22222 111111 666666 222222
44444 44444
333333 1111111
333333
666666

Merci,

--Cyril--


JB
Le #4749011
Bonjour,

Range("BC12:BC20, C35:C39,
BC33:BC39").SpecialCells(xlCellTypeConstants, 23).Copy [en1]

JB

On 12 sep, 09:48, Cyril DUPONT wrote:
Bonjour à tous,

Voici ma question : J'ai 3 plages de valeurs différentes ("BC12:BC20"),
("C35:C39") et ("BC33:BC39") qui peuvent contenir, ou non, des données.
Ce que je souhaiterais c'est pouvoir les retrouver dans une seule colonne
("EN" par exemple) sans les cellules vides provenant des 3 plages...

Exemple concret :

plage1 plage2 plage3 colonne"EN"

22222 111111 666666 222222
44444 44444
333333 1111111
333333
666666

Merci,

--Cyril--


lSteph
Le #4748991
Bonjour,

Sub grouplage()
Dim c As Range, maplage As Range
Set maplage = Union([Plage1], [Plage2], [Plage3])
Application.ScreenUpdating = False
For Each c In maplage.Cells
If Not IsEmpty(c) Then [e65536].End(xlUp)(2) = c
Next
Set maplage = Nothing
End Sub

'lSteph

On 12 sep, 09:48, Cyril DUPONT wrote:
Bonjour à tous,

Voici ma question : J'ai 3 plages de valeurs différentes ("BC12:BC20"),
("C35:C39") et ("BC33:BC39") qui peuvent contenir, ou non, des données.
Ce que je souhaiterais c'est pouvoir les retrouver dans une seule colonne
("EN" par exemple) sans les cellules vides provenant des 3 plages...

Exemple concret :

plage1 plage2 plage3 colonne"EN"

22222 111111 666666 222222
44444 44444
333333 1111111
333333
666666

Merci,

--Cyril--


Cyril DUPONT
Le #4748941
Merci beaucoup à vous 3 d'avoir répondu aussi rapidement !

--Cyril--




Bonjour à tous,

Voici ma question : J'ai 3 plages de valeurs différentes ("BC12:BC20"),
("C35:C39") et ("BC33:BC39") qui peuvent contenir, ou non, des données.
Ce que je souhaiterais c'est pouvoir les retrouver dans une seule colonne
("EN" par exemple) sans les cellules vides provenant des 3 plages...

Exemple concret :

plage1 plage2 plage3 colonne"EN"

22222 111111 666666 222222
44444 44444
333333 1111111
333333
666666

Merci,

--Cyril--


Publicité
Poster une réponse
Anonyme