[VBA] Comparer les valeurs de deux listes
Résolu/Fermé
adrienew
adrienew
- Messages postés
- 3
- Date d'inscription
- jeudi 27 décembre 2012
- Statut
- Membre
- Dernière intervention
- 28 décembre 2012
adrienew
- Messages postés
- 3
- Date d'inscription
- jeudi 27 décembre 2012
- Statut
- Membre
- Dernière intervention
- 28 décembre 2012
A voir également:
- Vba comparer deux listes
- Comparer une valeur à une liste excel - Meilleures réponses
- [VBA] Comparer les valeurs de deux listes ✓ - Forum - Excel
- Comparer 2 listes de valeurs vba - Forum - VB / VBA
- Comparaison de deux colonnes sous vba ✓ - Forum - VB / VBA
- Comparaison de 2 colonne + résultat dans la 3eme - Forum - VB / VBA
- Comparer deux listes sur deux feuilles différentes VBA ✓ - Forum - Excel
2 réponses
f894009
27 déc. 2012 à 11:31
- Messages postés
- 16490
- Date d'inscription
- dimanche 25 novembre 2007
- Statut
- Membre
- Dernière intervention
- 21 mai 2022
27 déc. 2012 à 11:31
Bonjour,
Code ameliore:
Pour votre code il faut indiquer quelle feuille pour la liste feuille1 et pour la ligne a deleter.
Bonne fete de fin d'annee
Code ameliore:
Sub Compare() Dim i As Integer Dim col_2 As Range 'Definition plage de cellules en memoire pour vitesse execution Set col_2 = Worksheets("feuil2").Range("A1:A50") With ThisWorkbook.Sheets("Feuil1") For i = 50 To 2 Step -1 'Test si valeur cellule feuil1!=Ax est dans Plage col_2(feuil2!A1:A50)) If Application.CountIf(col_2, .Range("A" & i).Value) = 0 Then 'Delete ligne i feuil1 .Rows(i).Delete End If Next i End With End Sub
Pour votre code il faut indiquer quelle feuille pour la liste feuille1 et pour la ligne a deleter.
Bonne fete de fin d'annee