XL 2013 Comparaison entre 2 colonnes Excel VBA macro

xUpsilon

XLDnaute Accro

• 28 Octobre 2019

• #2

Bonjour,

Je ne suis pas sur d'avoir compris.
En gros tu veux tester si ce qui est dans la colonne E correspond à ce qu'il y a dans les colonnes A et C c'est ça ?

Bonne continuation

 

Vote positif 0 Vote négatif

J

JdW

XLDnaute Nouveau

• 28 Octobre 2019

• #3

xUpsilon à dit:

Bonjour,

Je ne suis pas sur d'avoir compris.
En gros tu veux tester si ce qui est dans la colonne E correspond à ce qu'il y a dans les colonnes A et C c'est ça ?

Bonne continuation

Cliquez pour agrandir...

Bonjour,

Merci pour ta réponse rapide

Oui c'est cela je veux tester ou comparer ce qui est dans la colonne E correspond à ce qu'il y a dans les colonnes A et C !

 

Vote positif 0 Vote négatif

xUpsilon

XLDnaute Accro

• 28 Octobre 2019

• #4

Re,

Voir ci-joint.

Bonne continuation

 

Pièces jointes

• BH.xlsm

  19.3 KB · Affichages: 15

Vote positif 0 Vote négatif

J

JdW

XLDnaute Nouveau

• 28 Octobre 2019

• #5

xUpsilon à dit:

Re,

Voir ci-joint.

Bonne continuation

Cliquez pour agrandir...

Re
Merci beaucoup pour ta réponse !
Je reformule ma question

Enfaite je veux crée une boucle qui parcour la colonne A "ID" et la colonne E "Party" pour comparer les ID au name dans la colonne C et si elle trouve un ID qui correspond au name de la colonne C elle l'affiche dans la colonne F
et si elle ne trouve pas elle ne l'affiche pas et passe au suivant ID aini de suite sans crée de bouton

sachant que la j'ai que 2 ID je peux en avoir 1000 ID c'est pour cela je cherche une boucle dynamique

je vous remercie d'avance !!

en piéce jointe un autre excel plus clair.

 

Pièces jointes

• BH3.xlsx

  11.6 KB · Affichages: 5

Vote positif 0 Vote négatif

xUpsilon

XLDnaute Accro

• 28 Octobre 2019

• #6

Re,

Je ne comprends pas ta demande. En gros pour chaque ID dans la colonne A tu parcours toute la colonne C et tu regardes si il existe une cellule de C telle que A + C = E ?

Je ne sais pas ce que tu entends par "dynamique", mais si c'est simplement le fait que la boucle parcoure tous les termes, peu importe leur nombre, alors ma macro est "dynamique".

Bonne continuation

 

Vote positif 0 Vote négatif

J

JdW

XLDnaute Nouveau

• 28 Octobre 2019

• #7

Re,
Oui excatement ca A + C = E
(Je n'arrive pas a formuler ma question plus simplement que toi mdr)

Merci

 

Vote positif 0 Vote négatif

xUpsilon

XLDnaute Accro

• 28 Octobre 2019

• #8

Re,

Plutot ça ?
Je prends A et E d'une ligne, je les compare : si le terme entre parenthèses en E est le même que A alors je regarde si il existe un terme de C qui corresponde à ce qu'on a en E et je renvoie la ligne a laquelle il a été trouvé.

Est-ce que c'est ce que tu voulais ?

Bonne continuation

 

Pièces jointes

• BH.xlsm

  18.3 KB · Affichages: 6

Vote positif 0 Vote négatif

J

JdW

XLDnaute Nouveau

• 28 Octobre 2019

• #9

Re,

Excatement cela , tu ma bien compris !! Yes yes !!
Merci infinément !!!! ;p

 

Vote positif 0 Vote négatif

BOISGONTIER

XLDnaute Barbatruc

Repose en paix

• 28 Octobre 2019

• #10

Bonjour,

Ce que j'ai compris

VB:

Sub essai()
  Set Rng = Range("a2:a" & [A65000].End(xlUp).Row)
  Set Rng2 = Range("c2:c" & [A65000].End(xlUp).Row)
  Set Rng3 = Range("e2:e" & [e65000].End(xlUp).Row)
  Set d = CreateObject("scripting.dictionary")
  For i = 1 To Rng.Count
    x = CStr(Rng(i))
    d(x) = Rng2(i)
  Next i
  For i = 1 To Rng3.Count
    x = Rng3(i)
    p = InStr(x, "(")
    code = Mid(x, p + 1)
    code = Left(code, Len(code) - 1)
    y = Left(x, p - 1)
    d(code) = d(code) & " " & y
  Next i
  [g2].Resize(d.Count) = Application.Transpose(d.keys)
  [H2].Resize(d.Count) = Application.Transpose(d.items)
End Sub

Boisgontier

 

Pièces jointes

• Copie de BH.xlsm

  19.5 KB · Affichages: 9

Vote positif 0 Vote négatif