Logo GNT
Actualités Tests & Guides Bons Plans
GTA 6 iPhone 17 Copilot Switch 2 Temu ChatGPT Tesla
OVH Cloud OVH Cloud
Entraide Applications Microsoft Office Excel comparaison liste

comparaison liste

2 réponses
Avatar
sharmi
Bonjour
Je me demande de quelle façon procéder pour comparer des listes de valeur
Exemple: rechercher les éléments équivalents dans la colonne B des 2 liste - pour les afficher en synthèse dans un tableau avec les 3 colonnes :
Liste Lu Liste L
A B C A B
lu ref1 34 La ref23 42
lu ref23 45 La ref9 1
lu ref4 100 La ref1 12
RESULTAT A AFFICHER
A B
Lu ref1 3
La ref1 12
Lu ref23 4
La ref23 4
Avez vous une solution
Merc
Signaler un problème avec ce contenu

2 réponses

Supprimer
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
Avatar
isabelle
bonjour sharmi,

avec la formule ¡&B1 ajouté sur la colonne D de la feuill Lu et de la
feuille La

mettre cette formule sur la colonne C de la feuille résultat

=INDEX(INDIRECT(A1&"!C:C");EQUIV(A1&B1;INDIRECT(A1&"!D:D");0))

isabelle


Bonjour,
Je me demande de quelle façon procéder pour comparer des listes de valeur.
Exemple: rechercher les éléments équivalents dans la colonne B des 2 liste - pour les afficher en synthèse dans un tableau avec les 3 colonnes :
Liste Lu Liste La
A B C A B C
lu ref1 34 La ref23 42
lu ref23 45 La ref9 10
lu ref4 100 La ref1 124
RESULTAT A AFFICHER :
A B C
Lu ref1 34
La ref1 124
Lu ref23 45
La ref23 42
Avez vous une solution ?
Merci


Avatar
AV
Les grandes lignes (à adapter)
En A1:Cx de "Feuil1" la 1° liste avec étiquettes de colonnes et pas de "données
parasites" au-delà de la colonne C
En A1:Cx de "Feuil2" la 2° liste avec étiquettes de colonnes et pas de "données
parasites" au-delà de la colonne C
Extraction en "Feuil3"

Sub zz_Extract_Doublons()
Application.ScreenUpdating = False
Sheets("Feuil1").[A1].CurrentRegion.Copy ([Feuil3!A1])
x = Sheets("Feuil3").[A65536].End(3).Address '(2)
Sheets("Feuil2").[A1].CurrentRegion.Copy (Sheets("Feuil3").Range(x)(2))
Sheets("Feuil3").Select
Range(x)(2).EntireRow.Delete
plg = Range("B2:B" & [B65536].End(3).Row).Address
For Each C In Range(plg)
If Application.CountIf(Range(plg), C.Value) = 1 Then
C.EntireRow.Delete
End If
Next C
[B:B].Sort Key1:=Range("B1"), Order1:=xlAscending, Orientation:=xlTopToBottom
[A1].Select
End Sub

AV

"sharmi" a écrit dans le message news:

Bonjour,
Je me demande de quelle façon procéder pour comparer des listes de valeur.
Exemple: rechercher les éléments équivalents dans la colonne B des 2 liste -
pour les afficher en synthèse dans un tableau avec les 3 colonnes :

Liste Lu Liste La
A B C A B C
lu ref1 34 La ref23 42
lu ref23 45 La ref9 10
lu ref4 100 La ref1 124
RESULTAT A AFFICHER :
A B C
Lu ref1 34
La ref1 124
Lu ref23 45
La ref23 42
Avez vous une solution ?
Merci