Discussion :

[Yullll]

Bonjour,

Je voudrais appliquer via une macro un RECHERCHEV sur un plage donnée.
La plage étant C3:C2217, je me suis lancé dans l'écriture de mon VLOOKUP.
J'ai fait ce code qui répond parfaitement a mes attentes.
Cependant mes valeurs dans les cellules ont le message d'erreur suivant : #NOM?
Je double clique sur la cellule et fait entrer et paff ca marche
Je sais pas trop d'ou ça peut venir, pouvez vous m'aider ??

voici le code

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
 
Sub LOOKUP ()
Sheets("Entrées S1").Select
 
Range("C1").Value = " Vérification"
 Range("C2").Select
    ActiveCell.FormulaR1C1 = "=VLOOKUP(RC[-2],'Analyse S'!A:B,2,FALSE)"
    Range("C2").AutoFill Destination:=Range("C2:C2758")
    Range("C2").Select
 
End sub

[Philippe Tulliez]

Bonjour,
Je trouve assez amusant que tu écrives

J'ai fait ce code qui répond parfaitement a mes attentes.

et une ligne plus loin

Cependant mes valeurs dans les cellules ont le message d'erreur suivant : #NOM?

Si tu as un message d'erreur, il me semble que le code ne peut justement pas répondre à tes attentes.

As-tu regardé la syntaxe produite par le code VBA dans une des cellules où le message d'erreur #NOM? est renvoyé ?
Cela signifie que la chaîne de caractères que tu utilises pour écrire la formule n'est pas correcte.

De plus j'ajouterais que c'est une très mauvaise idée d'utiliser des colonnes plutôt qu'une plage de cellules pour définir la matrice de recherche de la fonction RECHERCHEV

Pour écrire une formule en VBA, il faut d'abord l'écrire et la tester manuellement.
Je te conseille la lecture de ces deux billets Ecrire une formule dans Excel à l'aide d'une procédure VBA et Ecrire une formule dans Excel à l'aide d'une procédure VBA (Part 2)

[Yullll]

Bonjour philippe,

Oui il me convient dans le sens où il fait exactement ce que je veux ! Apres je peux également cliquer sur la ligne faire entrer et tirer le tout...
Mais bon je me vois mal faire ces actions devant le client ...
J'ai vérifier la syntaxe de ma formule on dirait qu'il a du mal a détecter de-suite la feuil Analyse S.
Je n'ai pas d'idée pour remédier a ça ...
Merci pour les ouvrages je les consulterai quand j'aurais plus de temps !

[Yullll]

Bon, j'ai réussi a trouvé effectivement ma syntaxe dans le Vlookup n'étais pas bonne ou du moins pas exploitable avec cette correction ca marche très bien pour ceux que ca intérèsse. (Merci pour la piste Philippe)

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
Sheets("stocks S1").Select
Range("C1").Value = " Vérification"
 
 Range("C2").Select
    ActiveCell.FormulaR1C1 = "=VLOOKUP(RC[-2],'Analyse S'!C[-2]:C[1],4,FALSE)"
    Range("C2").Select
    Range("C2").AutoFill Destination:=Range("C2:C2758")
    Range("C2").Select

Cordialement