Ajouter des cellules apres comparaison

bobafric

XLDnaute Occasionnel
Salut à tous
Aujourd'hui j'ai le vent en poupe et comme vous me régalez avec vos solutions je vais vous en demander une autre.
Je voudrais ajouter à une suite de noms (en colonne A par exemple) les noms que j'ai dans une autre liste et qui n'existe pas dans la colonne A.
Exemple
Dans la colonne A de la Feuille 1 je veux rajouter les noms de la colonne C de la feuille A2 a la suite à l'aide d'une macro.
Merci encore
Bob
 

Pièces jointes

  • Ajouter.xls
    22 KB · Affichages: 37

pedrag31

XLDnaute Occasionnel
Re : Ajouter des cellules apres comparaison

Bonjour Bobafric, Bonjour le forum,

Voir solution dans le fichier joint...

Recherche du nom dans la premiere feuille puis copie vers la derniere ligne de la colonne A si le nom n'a pas ete trouve...

En esperant que ca pourra s'adapter a ton application...

Bonne journee, :)
 

Pièces jointes

  • Ajouter.zip
    17.2 KB · Affichages: 29
  • Ajouter.zip
    17.2 KB · Affichages: 27
  • Ajouter.zip
    17.2 KB · Affichages: 28

pedrag31

XLDnaute Occasionnel
Re : Ajouter des cellules apres comparaison

Bonjour Masterdisco, le forum,

En effet, tres bonne remarque, je n'avais pas pense a la plage "variable" de la liste de nom... Et cela evite egalement les erreurs si cell.value="" , comme il n'y a pas de test If Not cell.value="" Then..., bien vu.;)

Merci pour la correction.

Bonne journee, :)
 

bobafric

XLDnaute Occasionnel
Re : Ajouter des cellules apres comparaison

Nickel Pedrag31
Par contre je l'ai adapté à mon classeur pour toutes les feuilles, en remplaçant:
Worksheets("Feuil2") par ActiveSheets.
La solution de masterdico est intéressante mais en changeant Sheets(2) par ActiveSheets j'ai un message d'erreur "Objet requis"
Merci A plus
Bob
 

Discussions similaires

Statistiques des forums

Discussions
312 505
Messages
2 089 070
Membres
104 017
dernier inscrit
annboi19