Ceci est une page optimisée pour les mobiles. Cliquez sur ce texte pour afficher la vraie page.

XL 2010 Concaténer des cellules sous conditions

Créer une discussion

Boostez vos compétences Excel avec notre communauté !

Rejoignez Excel Downloads, le rendez-vous des passionnés où l'entraide fait la force. Apprenez, échangez, progressez – et tout ça gratuitement ! 👉 Inscrivez-vous maintenant !

S'inscrire
E

Elodie195

XLDnaute Occasionnel
Bonjour,

Je sollicite votre aide pour une macro EXCEL.

J'ai un fichier excel avec à l'intérieur un tableau de 9 colonnes.

Les colonnes qui nous intéresse sont les colonnes 1, 4 et 9.

En effet, je souhaiterais que lorsque le numéro de dossier de la colonne 4 est présent 2 ou 3 fois, cela concatène les données des colonnes 1 et 9 (séparé par une virgule).

J'ai fait un onglet "A obtenir" dans le fichier exemple, ce sera plus parlant.

Merci de votre aide.

Bonne journée.
 

Pièces jointes

Trier par date Trier par votes
bonjour,

pas sur que ce soit une bonne idée

par ex, sur la dernière ligne de 'à obtenir', on a en test1 P12 13 et 14
en test 2 on a MGD alors que le P13 et le P14 sont des MSD

c'est quoi le but, exactement ?
 
Vote positif 0 Vote négatif
Bonjour,

La colonne 2 avec les MSD/MGD/PPG peut être ignorée. Cette valeur n'a pas d'importance. On peut même l'effacer avant la concaténation, il n'y a aucune incidence.

Le but c'est juste d'avoir les colonnes A et I fusionnées en fonction d'un même nom de dossier en colonne D 🙂

Bonne journée.
 
Vote positif 0 Vote négatif
bonjour Elodie,Bertrand🙂
copy en j2 a adapter
VB: 
Sub es()
Dim t(), i As Long, m As Object, c As Byte, z
  Set m = CreateObject("Scripting.Dictionary")
  t = Range("a2:i" & Cells(Rows.Count, 1).End(3).Row)
   For i = 1 To UBound(t)
   z = t(i, 4)
   If m.Exists(z) Then
   t(m(z), 1) = t(m(z), 1) + t(i, 1)
   t(m(z), 9) = t(m(z), 9) + t(i, 9)
   Else
   x = x + 1
   For c = 1 To 9: t(x, c) = t(i, c): Next c:   m(z) = x
   End If
   Next i
  [j2].Resize(x, 9) = t
End Sub
 
Vote positif 0 Vote négatif
Identifiez-vous ou inscrivez-vous pour participer.
Rejoins nos membres "Supporter XLD" et booste ton expérience Excel !
- Navigue sans publicité
- Accède à Cléa, notre assistante IA experte Excel... et pas que...
- Profite de fonctionnalités exclusives
Ton soutien permet à Excel Downloads de rester 100% gratuit et de continuer à rassembler les passionnés d'Excel.
Je deviens Supporter XLD

Discussions similaires

Z
  • Question Question
Microsoft 365 Définir des plages de dates
Réponses
12
Affichages
496
Zazagally
Z
K
  • Question Question
Microsoft 365 Consolidation fichier XLS
Réponses
3
Affichages
231
oguruma
M
  • Question Question
Power Query Fractionner et modifier les colonnes d'un tableau
2
Réponses
18
Affichages
808
job75
T
  • Question Question
Microsoft 365 Besoin d'aide pour transférer des cellules sous plusieurs conditions
Réponses
5
Affichages
620
fanfan38
A
  • Question Question
Power Query Détecter le nombre de doublons avec power query
Réponses
12
Affichages
474
alexga78
A
O
  • Résolu(e)
XL 2013 Formule ou une programmation VBA qui permette de répartir des numéros de factures par ligne
Réponses
3
Affichages
122
JHA
J
P
  • Résolu(e)
Microsoft 365 Macro Excel pour effectuer des opérations sur les lignes et cellules adjacentes
2
Réponses
19
Affichages
538
Perceval973
P
D
  • Question Question
XL 2013 Aide à création Fichiers, SMS, envoi
Réponses
0
Affichages
248
DARRIEUX
D
V
  • Résolu(e)
Microsoft 365 Convertir des dates au format US avec heures/minutes au format FR
Réponses
6
Affichages
241
AtTheOne
F
  • Question Question
Microsoft 365 TCD avec Formules?
Réponses
12
Affichages
680
chris
P
  • Question Question
XL 2016 Macro pour masquer/démasquer des cellules via mot de passe
Réponses
6
Affichages
272
Jacky67
H
  • Question Question
XL 2021 Formules avec si / et / ou imbriquées
Réponses
5
Affichages
197
hades
H
H
  • Question Question
Power Query Récupérer des données multiples dans un dossier
Réponses
9
Affichages
317
hijackfr
H
B
  • Question Question
XL 2019 PB avec fonction rechercheV ou recherche H
Réponses
5
Affichages
329
bruiz
B
O
  • Résolu(e)
XL 2016 Formule qui ajoute/concatenne des informations de plusieurs cellule séparé d'un éléments
Réponses
3
Affichages
113
sylvanu
Y
  • Question Question
XL 2019 Masquer automatiquement des lignes selon la valeur d'une cellule ?
Réponses
2
Affichages
316
Yogean
Y
M
  • Question Question
XL 2019 Transposer des données d'une feuille vers une autre sous forme de synthèse
Réponses
8
Affichages
628
mromain
F
  • Résolu(e)
Microsoft 365 copier coller des colonnes en fonction de la valeur d'une cellule
Réponses
8
Affichages
913
loloboc
L
Y
  • Résolu(e)
XL 2016 Importer des données suivant l'ordre de passage
2
Réponses
15
Affichages
551
YGU1
Y
R
  • Question Question
XL 2010 Copie de plusieurs plages de cellules spécifiques dans le presse-papier
2
Réponses
20
Affichages
709
Dranreb
Menu
Connexion
S'inscrire
Les cookies sont requis pour utiliser ce site. Vous devez les accepter pour continuer à utiliser le site. En savoir plus…