Sur une feuille (1) Excel je vais retrouver différents numéros d'employés
dans une colonne (E). Sur une autre feuille (2), il y a les mêmes nos
d'employés, mais dans la cellule à côté, il y a le nom correspondant à ce
même numéro.
Je souhaiterais pouvoir en VBA que les noms correspondants aux numéros sur
la feuille 2 puissent se retrouver à côté des noms en feuille 1 dans la
colonne F par exemple. Il n'y a pas de lignes vides.
J'ai essayé la fonction Match, mais je n'obtiens pas de résultat.
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
anonymousA
Bonjour,
pas vraiment besoin de VBA pour ca, mais si tu y tiens , on peut utiliser la fonction Vlookup pour faire ca ou l'association de la fonction index avec la fonction match pour ceux qui en sont des inconditionnels.
A+
Bonjour à tous,
Sur une feuille (1) Excel je vais retrouver différents numéros d'employés dans une colonne (E). Sur une autre feuille (2), il y a les mêmes nos d'employés, mais dans la cellule à côté, il y a le nom correspondant à ce même numéro.
Je souhaiterais pouvoir en VBA que les noms correspondants aux numéros sur la feuille 2 puissent se retrouver à côté des noms en feuille 1 dans la colonne F par exemple. Il n'y a pas de lignes vides.
J'ai essayé la fonction Match, mais je n'obtiens pas de résultat.
Auriez-vous une piste pour moi?
Merci bien
Denys
Bonjour,
pas vraiment besoin de VBA pour ca, mais si tu y tiens , on peut
utiliser la fonction Vlookup pour faire ca ou l'association de la
fonction index avec la fonction match pour ceux qui en sont des
inconditionnels.
A+
Bonjour à tous,
Sur une feuille (1) Excel je vais retrouver différents numéros d'employés
dans une colonne (E). Sur une autre feuille (2), il y a les mêmes nos
d'employés, mais dans la cellule à côté, il y a le nom correspondant à ce
même numéro.
Je souhaiterais pouvoir en VBA que les noms correspondants aux numéros sur
la feuille 2 puissent se retrouver à côté des noms en feuille 1 dans la
colonne F par exemple. Il n'y a pas de lignes vides.
J'ai essayé la fonction Match, mais je n'obtiens pas de résultat.
pas vraiment besoin de VBA pour ca, mais si tu y tiens , on peut utiliser la fonction Vlookup pour faire ca ou l'association de la fonction index avec la fonction match pour ceux qui en sont des inconditionnels.
A+
Bonjour à tous,
Sur une feuille (1) Excel je vais retrouver différents numéros d'employés dans une colonne (E). Sur une autre feuille (2), il y a les mêmes nos d'employés, mais dans la cellule à côté, il y a le nom correspondant à ce même numéro.
Je souhaiterais pouvoir en VBA que les noms correspondants aux numéros sur la feuille 2 puissent se retrouver à côté des noms en feuille 1 dans la colonne F par exemple. Il n'y a pas de lignes vides.
J'ai essayé la fonction Match, mais je n'obtiens pas de résultat.
Auriez-vous une piste pour moi?
Merci bien
Denys
isabelle
bonjour Denys,
Set plg1 = Sheets("Feuil2").Range("A1:A5") Set plg2 = Sheets("Feuil2").Range("B1:B5") For Each c In Sheets("Feuil1").Range("A1:A5") If Not IsError(Application.Match(c, plg1, 0)) Then Range("F" & c.Row) = Application.Index(plg2, Application.Match(c, plg1, 0)) Else Range("F" & c.Row) = "Pas de correspondance" Next
isabelle
Bonjour à tous,
Sur une feuille (1) Excel je vais retrouver différents numéros d'employés dans une colonne (E). Sur une autre feuille (2), il y a les mêmes nos d'employés, mais dans la cellule à côté, il y a le nom correspondant à ce même numéro.
Je souhaiterais pouvoir en VBA que les noms correspondants aux numéros sur la feuille 2 puissent se retrouver à côté des noms en feuille 1 dans la colonne F par exemple. Il n'y a pas de lignes vides.
J'ai essayé la fonction Match, mais je n'obtiens pas de résultat.
Auriez-vous une piste pour moi?
Merci bien
Denys
bonjour Denys,
Set plg1 = Sheets("Feuil2").Range("A1:A5")
Set plg2 = Sheets("Feuil2").Range("B1:B5")
For Each c In Sheets("Feuil1").Range("A1:A5")
If Not IsError(Application.Match(c, plg1, 0)) Then
Range("F" & c.Row) = Application.Index(plg2, Application.Match(c, plg1, 0))
Else
Range("F" & c.Row) = "Pas de correspondance"
Next
isabelle
Bonjour à tous,
Sur une feuille (1) Excel je vais retrouver différents numéros d'employés
dans une colonne (E). Sur une autre feuille (2), il y a les mêmes nos
d'employés, mais dans la cellule à côté, il y a le nom correspondant à ce
même numéro.
Je souhaiterais pouvoir en VBA que les noms correspondants aux numéros sur
la feuille 2 puissent se retrouver à côté des noms en feuille 1 dans la
colonne F par exemple. Il n'y a pas de lignes vides.
J'ai essayé la fonction Match, mais je n'obtiens pas de résultat.
Set plg1 = Sheets("Feuil2").Range("A1:A5") Set plg2 = Sheets("Feuil2").Range("B1:B5") For Each c In Sheets("Feuil1").Range("A1:A5") If Not IsError(Application.Match(c, plg1, 0)) Then Range("F" & c.Row) = Application.Index(plg2, Application.Match(c, plg1, 0)) Else Range("F" & c.Row) = "Pas de correspondance" Next
isabelle
Bonjour à tous,
Sur une feuille (1) Excel je vais retrouver différents numéros d'employés dans une colonne (E). Sur une autre feuille (2), il y a les mêmes nos d'employés, mais dans la cellule à côté, il y a le nom correspondant à ce même numéro.
Je souhaiterais pouvoir en VBA que les noms correspondants aux numéros sur la feuille 2 puissent se retrouver à côté des noms en feuille 1 dans la colonne F par exemple. Il n'y a pas de lignes vides.
J'ai essayé la fonction Match, mais je n'obtiens pas de résultat.
Auriez-vous une piste pour moi?
Merci bien
Denys
isabelle
Denys, il faudra y ajouter le End If,
isabelle
Bonjour à tous,
Sur une feuille (1) Excel je vais retrouver différents numéros d'employés dans une colonne (E). Sur une autre feuille (2), il y a les mêmes nos d'employés, mais dans la cellule à côté, il y a le nom correspondant à ce même numéro.
Je souhaiterais pouvoir en VBA que les noms correspondants aux numéros sur la feuille 2 puissent se retrouver à côté des noms en feuille 1 dans la colonne F par exemple. Il n'y a pas de lignes vides.
J'ai essayé la fonction Match, mais je n'obtiens pas de résultat.
Auriez-vous une piste pour moi?
Merci bien
Denys
Denys, il faudra y ajouter le End If,
isabelle
Bonjour à tous,
Sur une feuille (1) Excel je vais retrouver différents numéros d'employés
dans une colonne (E). Sur une autre feuille (2), il y a les mêmes nos
d'employés, mais dans la cellule à côté, il y a le nom correspondant à ce
même numéro.
Je souhaiterais pouvoir en VBA que les noms correspondants aux numéros sur
la feuille 2 puissent se retrouver à côté des noms en feuille 1 dans la
colonne F par exemple. Il n'y a pas de lignes vides.
J'ai essayé la fonction Match, mais je n'obtiens pas de résultat.
Sur une feuille (1) Excel je vais retrouver différents numéros d'employés dans une colonne (E). Sur une autre feuille (2), il y a les mêmes nos d'employés, mais dans la cellule à côté, il y a le nom correspondant à ce même numéro.
Je souhaiterais pouvoir en VBA que les noms correspondants aux numéros sur la feuille 2 puissent se retrouver à côté des noms en feuille 1 dans la colonne F par exemple. Il n'y a pas de lignes vides.
J'ai essayé la fonction Match, mais je n'obtiens pas de résultat.
Auriez-vous une piste pour moi?
Merci bien
Denys
Denys
Bonjour Isabelle,
Merci beaucoup, tout fonctionne à merveille...(comme d'habitude)
Bonne soirée à toi
Denys
bonjour Denys,
Set plg1 = Sheets("Feuil2").Range("A1:A5") Set plg2 = Sheets("Feuil2").Range("B1:B5") For Each c In Sheets("Feuil1").Range("A1:A5") If Not IsError(Application.Match(c, plg1, 0)) Then Range("F" & c.Row) = Application.Index(plg2, Application.Match(c, plg1, 0)) Else Range("F" & c.Row) = "Pas de correspondance" Next
isabelle
Bonjour à tous,
Sur une feuille (1) Excel je vais retrouver différents numéros d'employés dans une colonne (E). Sur une autre feuille (2), il y a les mêmes nos d'employés, mais dans la cellule à côté, il y a le nom correspondant à ce même numéro.
Je souhaiterais pouvoir en VBA que les noms correspondants aux numéros sur la feuille 2 puissent se retrouver à côté des noms en feuille 1 dans la colonne F par exemple. Il n'y a pas de lignes vides.
J'ai essayé la fonction Match, mais je n'obtiens pas de résultat.
Auriez-vous une piste pour moi?
Merci bien
Denys
Bonjour Isabelle,
Merci beaucoup, tout fonctionne à merveille...(comme d'habitude)
Bonne soirée à toi
Denys
bonjour Denys,
Set plg1 = Sheets("Feuil2").Range("A1:A5")
Set plg2 = Sheets("Feuil2").Range("B1:B5")
For Each c In Sheets("Feuil1").Range("A1:A5")
If Not IsError(Application.Match(c, plg1, 0)) Then
Range("F" & c.Row) = Application.Index(plg2, Application.Match(c, plg1, 0))
Else
Range("F" & c.Row) = "Pas de correspondance"
Next
isabelle
Bonjour à tous,
Sur une feuille (1) Excel je vais retrouver différents numéros d'employés
dans une colonne (E). Sur une autre feuille (2), il y a les mêmes nos
d'employés, mais dans la cellule à côté, il y a le nom correspondant à ce
même numéro.
Je souhaiterais pouvoir en VBA que les noms correspondants aux numéros sur
la feuille 2 puissent se retrouver à côté des noms en feuille 1 dans la
colonne F par exemple. Il n'y a pas de lignes vides.
J'ai essayé la fonction Match, mais je n'obtiens pas de résultat.
Merci beaucoup, tout fonctionne à merveille...(comme d'habitude)
Bonne soirée à toi
Denys
bonjour Denys,
Set plg1 = Sheets("Feuil2").Range("A1:A5") Set plg2 = Sheets("Feuil2").Range("B1:B5") For Each c In Sheets("Feuil1").Range("A1:A5") If Not IsError(Application.Match(c, plg1, 0)) Then Range("F" & c.Row) = Application.Index(plg2, Application.Match(c, plg1, 0)) Else Range("F" & c.Row) = "Pas de correspondance" Next
isabelle
Bonjour à tous,
Sur une feuille (1) Excel je vais retrouver différents numéros d'employés dans une colonne (E). Sur une autre feuille (2), il y a les mêmes nos d'employés, mais dans la cellule à côté, il y a le nom correspondant à ce même numéro.
Je souhaiterais pouvoir en VBA que les noms correspondants aux numéros sur la feuille 2 puissent se retrouver à côté des noms en feuille 1 dans la colonne F par exemple. Il n'y a pas de lignes vides.
J'ai essayé la fonction Match, mais je n'obtiens pas de résultat.
