Aide création macro
Résolu
kassarasta
Messages postés
25
Date d'inscription
Statut
Membre
Dernière intervention
-
kassarasta Messages postés 25 Date d'inscription Statut Membre Dernière intervention -
kassarasta Messages postés 25 Date d'inscription Statut Membre Dernière intervention -
Bonjour a tous,
Je refait une nouvelle conversation car je me suis aperçu que je m'exprimé mal sur l'ancienne.
Etant nul en conception de macro ( limite j'y connais rien ) j'aurai besoin d'un coup de main.
Ce dont j'ai besoin c'est que la macro recherche les doublons de la colonne A à D et que si c'est un doublons qu'il concatener la ligne entière! Et ce la jusqu’à la fin de mon fichier qui comporte pour le moment 96000 lignes et ou il risque y en avoir plus au final.
Mon patron me demande cela aujourd'hui pour hier ( façon de parler ) donc c'est relativement urgent!!
Merci d'avance à tous.
Je refait une nouvelle conversation car je me suis aperçu que je m'exprimé mal sur l'ancienne.
Etant nul en conception de macro ( limite j'y connais rien ) j'aurai besoin d'un coup de main.
Ce dont j'ai besoin c'est que la macro recherche les doublons de la colonne A à D et que si c'est un doublons qu'il concatener la ligne entière! Et ce la jusqu’à la fin de mon fichier qui comporte pour le moment 96000 lignes et ou il risque y en avoir plus au final.
Mon patron me demande cela aujourd'hui pour hier ( façon de parler ) donc c'est relativement urgent!!
Merci d'avance à tous.
A voir également:
- Aide création macro
- Telecharger macro convertir chiffre en lettre excel - Télécharger - Tableur
- Creation compte gmail - Guide
- Création site web - Guide
- Media creation tool - Télécharger - Systèmes d'exploitation
- Création compte google - Guide
2 réponses
Bjr,
Pourquoi concaténer ? Il serait plus simple de supprimer les doublons non ?
Dans les deux cas les données du doublon sont supprimées, mais avec une concaténation, non seulement le code est plus compliqué mais en plus le tableau sera difficilement traitable par la suite...
Cdt,
Pourquoi concaténer ? Il serait plus simple de supprimer les doublons non ?
Dans les deux cas les données du doublon sont supprimées, mais avec une concaténation, non seulement le code est plus compliqué mais en plus le tableau sera difficilement traitable par la suite...
Cdt,
Voilà un code qui devrait faire l'affaire avec 2 prérequis :
1) vous partez des mêmes dispositions que le document joint par vous-memes : https://www.cjoint.com/c/FBzkXf1Udxi
2) Veuillez d'abord trier l'ensemble du tableau par ordre alphabétique de votre colonne A:A de concaténation pour identifier les doublons.
Le code s'applique par défaut sur la 1ère feuille et s'arrête à la colonne V:V
1) vous partez des mêmes dispositions que le document joint par vous-memes : https://www.cjoint.com/c/FBzkXf1Udxi
2) Veuillez d'abord trier l'ensemble du tableau par ordre alphabétique de votre colonne A:A de concaténation pour identifier les doublons.
Le code s'applique par défaut sur la 1ère feuille et s'arrête à la colonne V:V
Sub test()
With Sheets(1)
Dim DernLigne As Long
DernLigne = Sheets(1).Range("A" & Rows.Count).End(xlUp).Row
For i = 3 To DernLigne
If Cells(i, 1).Value = Cells(i - 1, 1).Value Then
For j = 6 To 22 'de la col F:F à V:V
Cells(i - 1, j).Value = Cells(i - 1, j).Value & " ; " & Cells(i, j).Value
Next j
Rows(i).Delete
i = i - 1
End If
Next i
End With
End Sub
En fait mon fichier est un fichier clients que je viens de récupérer et qui a besoin d'un traitement de doublon mais en gardant toute les données car ces clients sont deja distribuer a des personnes!! Donc j'ai des observations a conserver ( créer par la vendeuse ) l'origine de la fiches mais aussi ou elle se trouve ..... enfin bref toutes les sont a garder!!
Mettez des "XXXX" au lieu des données confidentielles/nominatives si besoin.
- Vous utilisez les filtres ou recherche/remplace pour supprimer tous les contenus de cellule qui ne correspondent à aucune donnée, par exemple : "IMPOSSIBLE A VOIR" doit devenir une cellule vide pour tout le tableau
- Ensuite vous ajouter une colonne en début de tableau (en A:A) dans laquelle vous faites la concaténation des données qui serviront d'identification pour les doublons. par exemple les colonnes A à D actuelles (donc B à E après ajout de la colonne en A:A)
-> conseil : séparer par un point virgule vos cellule : en A2 :
2solutions :
- Je vous fais enfin un code qui pour plusieurs lignes doublons n'en gardera qu'une en prenant la première information pour chaque colonne que les doublons proposent.
- Je vous fais enfin un code qui pour plusieurs lignes doublons n'en gardera qu'une en prenant la concaténation des informations disponibles sur la même colonne.
A vous de choisir :-)