Problème dans une comparaison de cellule
Boujour à tous,
Je suis actuellement bloquer sur un code sans comprendre pourquoi, et cela m'embete beaucoup ^^
J'ai actuellement deux fichiers excel contenant des valeurs dans la colonne A de chaque fichier.
J'aimerais comparer le la colonne A du fichier 1 avec la colonne A du fichier 2 et copier les cellules identiques dans la feuille 2 du fichier 1.
Mon code fonctionne "presque", puisque cela copie les premières valeurs idententique mais le code s'arrète dès qu'il rencontre une différence, sans prendre en compte le reste des cellules.
je vous joins les deux fichier.
Comparaison de la colonne A du fichier TestCouleur1.xlsm avec la colonne A du fichier TestCouleur2.xls
Si cellules identiques, copier ces cellules dans la feuil2 (Analyse) du fichier TestCouleur1 (la mise en couleur est optionnel)
Merci d'avance pour l'aide que vous pourriez m'apporter,
Cordialement,
Fonbs
Banzai64 a écrit :Bonjour
A tester
Bonjour,
Merci de votre réponse rapide et impeccable, exactement ce qu'il me fallait !
J'aurais cependant une question pour comprendre le code:
Je n'avais pas pensé a la fonction countif, mais a quoi correspond le > 0 à la fin, je ne saisis pas trop
If Application.CountIf(wsFicBi.Columns("A"), wsFicML.Range("A" & lgLig)) > 0 ThenMerci d'avance !
Bonjour
Fonbs a écrit :mais a quoi correspond le > 0 à la fin
C'est comme sur une feuille Excel la fonction NB.SI() retourne 0 si pas de correspondance, et un nombre supérieur à 0 si justement il y a 1 ou plusieurs concordances