Recherchev
Résolu
luyory
Messages postés
3
Date d'inscription
Statut
Membre
Dernière intervention
-
luyory Messages postés 3 Date d'inscription Statut Membre Dernière intervention -
luyory Messages postés 3 Date d'inscription Statut Membre Dernière intervention -
comment récupérer une donnée figurant dans un fichier source pour l'intégrer dans un fichier de destination.
La formule excel employée est une recherche verticale mais je n'arrive pas à la traduire en VBA;
voici mon script :
Range(Cells(1, 1), Cells(nb_ligne_fichier_source, nb_colonne_fichier_source)).Select
fichier_source = Selection
Windows("EXTREFFE.TXT").Activate 'j'active mon fichier de destination celui qui doit récuperer la donnee
ligne_lue = 2
While Not IsEmpty(Cells(1, ligne_lue))
matricule_lu = Cells(1, ligne_lue)'je définie le dénominateur commun
Cells(ligne_lue_12).Select 'je selectionne la cellule dans laquelle doit etre écrit la valeur recherchée
recherchev = Application.WorksheetFunction.VLookup(matricule_lu, fichier_source, 23, False) 'la recherche v
Cells(ligne_lue, 12).Value = recherchev
ligne_lue = ligne_lue + 1
Wend
La formule excel employée est une recherche verticale mais je n'arrive pas à la traduire en VBA;
voici mon script :
Range(Cells(1, 1), Cells(nb_ligne_fichier_source, nb_colonne_fichier_source)).Select
fichier_source = Selection
Windows("EXTREFFE.TXT").Activate 'j'active mon fichier de destination celui qui doit récuperer la donnee
ligne_lue = 2
While Not IsEmpty(Cells(1, ligne_lue))
matricule_lu = Cells(1, ligne_lue)'je définie le dénominateur commun
Cells(ligne_lue_12).Select 'je selectionne la cellule dans laquelle doit etre écrit la valeur recherchée
recherchev = Application.WorksheetFunction.VLookup(matricule_lu, fichier_source, 23, False) 'la recherche v
Cells(ligne_lue, 12).Value = recherchev
ligne_lue = ligne_lue + 1
Wend
2 réponses
Bonjour
Je crois que vous faites les choses à l'envers.
Commencez par le fichier destination
-relevez le matricule
-allez dans le fichier "source"
-avec la recherchev, récupérez la valeur de la colonne 23
-dans le fichier "destination", coller en colonne 12 sur la même ligne que le matricule testé.
-recommencez avec le matricule suivant.
Faites un essai avec l'enregistreur de macro, pour voir le processus, puis adaptez-le à votre code.
Bonne journée
Cdlt
Je crois que vous faites les choses à l'envers.
Commencez par le fichier destination
-relevez le matricule
-allez dans le fichier "source"
-avec la recherchev, récupérez la valeur de la colonne 23
-dans le fichier "destination", coller en colonne 12 sur la même ligne que le matricule testé.
-recommencez avec le matricule suivant.
Faites un essai avec l'enregistreur de macro, pour voir le processus, puis adaptez-le à votre code.
Bonne journée
Cdlt
Merci pour cette syntaxe car maintenant mon problème est résolu ;-)