Réponse #NOM? avec recherche(v)

Résolu/Fermé
BOBCHAU Messages postés 3 Date d'inscription mercredi 9 janvier 2019 Statut Membre Dernière intervention 17 mars 2023 - Modifié le 29 mars 2022 à 11:17
BOBCHAU Messages postés 3 Date d'inscription mercredi 9 janvier 2019 Statut Membre Dernière intervention 17 mars 2023 - 29 mars 2022 à 17:28
Bonjour,
Suite au conseil qui a suivi ma précédente demande, je reformule.

Je cherche à marquer les enregistrements d'une feuille "Travail" par "OK" en colonne 2 si la valeur concat de la ligne est trouvée dans la feuille "Liste" avec le code suivant.

========================================================
Public i As Integer
Public DL_T, DL_L As Long
Public Nomcherché As String
Sub Travail()
DL_T = Sheets("Travail").Columns("A").Find("*", , , , , xlPrevious).Row
For i = 2 To 15 'DL_T ' DL_Travail
    Nomcherché = Range("A" & i).Value
        'MsgBox Nomcherché & " Travail"
    Range("B" & i).Select
    ActiveCell.FormulaR1C1 = "=VLOOKUP(Nomcherché,Liste!R[-1]:R[1048574],2)"
    Next i
End Sub

=========================================================
la réponse est #NOM? si je lance la procédure.

Votre aide me sera précieuse car ma feuille "Travail" contient 16000 enregistrements.
D'avance Merci.

https://www.cjoint.com/c/LCDi21GSCox

EDIT : Ajout du LANGAGE dans les balises de code (la coloration syntaxique).
Explications disponibles ici :
https://codes-sources.commentcamarche.net/faq/10686-le-nouveau-codes-sources-comment-ca-marche#balises-code

Merci d'y penser dans tes prochains messages.

2 réponses

via55 Messages postés 14408 Date d'inscription mercredi 16 janvier 2013 Statut Membre Dernière intervention 5 mai 2024 2 704
29 mars 2022 à 14:38
Bonjour

1) il y a 2 choses différentes dans ton fichier : une formule RECHERCHEV qui renvoie #NOM car le nom Nomcherché n'existe pas comme plage nommée mais n'existe que dans la macro ! et une macro qui est lancée par on ne sait quoi et qui donc ne s'applique pas

2) la macro est superfétatoire, la bonne formule de RECHERCHEV associée avec une gestion d'erreur permet de marquer OK quand la concaténation est trouvée dans Liste :
https://www.cjoint.com/c/LCDmGOZTH5G

Cdlmnt
Via

0
BOBCHAU Messages postés 3 Date d'inscription mercredi 9 janvier 2019 Statut Membre Dernière intervention 17 mars 2023
29 mars 2022 à 17:28
Merci de votre réponse.
Une belle épine en moins
Cordialement
0