Compiler liste de plusieurs plages en une seule, sans cellule vide
4 réponses
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...
Cette action est irreversible, confirmez la suppression du commentaire ?
Signaler le commentaire
Veuillez sélectionner un problème
Nudité
Violence
Harcèlement
Fraude
Vente illégale
Discours haineux
Terrorisme
Autre
Daniel.C
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" a écrit dans le 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...
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" <CyrilDUPONT@discussions.microsoft.com> a écrit dans le
message de news: 5CBA33D5-2881-4AE0-B9DF-F65E2203FCC2@microsoft.com...
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...
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" a écrit dans le 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...
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...
On 12 sep, 09:48, Cyril DUPONT <CyrilDUP...@discussions.microsoft.com>
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...
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...
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...
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 <CyrilDUP...@discussions.microsoft.com>
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...
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...
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...
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...
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...
