Transposer des lignes avec données partiellement identiques
Fermé
creator3_1969
Messages postés
13
Date d'inscription
vendredi 25 janvier 2019
Statut
Membre
Dernière intervention
9 avril 2020
-
25 janv. 2019 à 19:00
titeufdu89 Messages postés 374 Date d'inscription samedi 28 juillet 2012 Statut Membre Dernière intervention 1 avril 2023 - 26 janv. 2019 à 10:59
titeufdu89 Messages postés 374 Date d'inscription samedi 28 juillet 2012 Statut Membre Dernière intervention 1 avril 2023 - 26 janv. 2019 à 10:59
A voir également:
- Transposer des lignes avec données partiellement identiques
- Excel validation des données liste - Guide
- Reinstaller windows sans perte de données - Guide
- Effacer les données de navigation - Guide
- Excel trier par ordre alphabétique en gardant les lignes - Guide
- Tnt base de données vide ✓ - Forum TNT / Satellite / Réception
1 réponse
titeufdu89
Messages postés
374
Date d'inscription
samedi 28 juillet 2012
Statut
Membre
Dernière intervention
1 avril 2023
38
26 janv. 2019 à 10:59
26 janv. 2019 à 10:59
Bonjour Laurent,
Voici une macro qui devrait faire l'affaire :
A coller dans le module VBA de la feuille contenant le tableau à analyser puis l’exécuter
Bonne journée
Jc
Voici une macro qui devrait faire l'affaire :
Sub suppr_doublon()
Application.ScreenUpdating = False
For i = 2 To Range("C65536").End(xlUp).Row
If Range("C" & i).Value <> "" And Range("D" & i).Value <> "" Then
cod = Range("C" & i).Value
dest = Range("D" & i).Value
Do While Range("C" & i + 1) = cod And Range("D" & i + 1).Value = dest
Rows(i + 1).EntireRow.Delete
Loop
End If
Next i
End Sub
A coller dans le module VBA de la feuille contenant le tableau à analyser puis l’exécuter
Bonne journée
Jc