Discussion :

[Polygos]

Bonjour
ma formule ne marche pas
J'ai un un classeur SOURCE wb1, sa feuille ws1 définie, qui contient des infos texte sur une plage définie:

Code :

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

1
2
3
4
Set wb1 = Workbooks.Open("C:\Users\SOURCE.xlsm")
    Set ws1 = wb1.Worksheets("Dossier")
    Dim Plage As Variant
    Set Plage = Range("A8:AS2149")

L'info est en 43; ciolonne AQ

J'ai un classeur Synthèse wb2, sa feuille ws2

Code :

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

1
2
  Set wb2 = ThisWorkbook
    Set ws2 = wb2.Worksheets("Feuil1")

C'est lui qu'on remplit.

Dans une boucle sur wb2 donc, je veux seulement reporter en (i,7) la valeur texte trouvée dans wb1 dans la "Plage", sur la base du critère cellule i, colonne 1 de ws2

J'écris tout ça comme ça:

Code :

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

ws2.Cells(i, 7) = Application.WorksheetFunction.VLookup(ws2.Cells(i, 1), ws1.Range("Plage"), 43, False)

Le retour est N#A...

Merci de votre aide !

[Philippe Tulliez]

Bonjour,
Il me semble avoir déjà répondu sur le même sujet dans cette réponse.
Cela ne sert à rien d'ouvrir une nouvelle discussion sur le même sujet. Cela irrite les personnes qui prennent la peine de répondre.
Si tu ne comprends pas les réponses reste dans la même discussion et demande des précisions.

Dans ta première procédure, il y a d'après moi, déjà un problème

Code :

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

1
2
3
4
Set wb1 = Workbooks.Open("C:\Users\SOURCE.xlsm")
    Set ws1 = wb1.Worksheets("Dossier")
    Dim Plage As Variant
    Set Plage = Range("A8:AS2149")

La variable objet Plage (déclarée comme Variant alors qu'elle devrait être déclarée comme un Range) a comme objet parent la feuille active.
Où as-tu déclaré les variables wb1 et ws1 ?

[Polygos]

Bonjour Philippe,
je pense que c'est bien un second sujet car l'approche est différente.
La première solution donnée, difficile à comprendre quand on n'est pas spécialiste, est par contre très synthétique donc intéressante. Mais il faut du temps pour entrer dedans.
La seconde demandée, rechercher une erreur dans ma formule, à moins que le principe de cette formule ne soit pas adaptée, doit conduire au résultat aussi, surtout pour les non spécialistes.
Voila pourquoi j'ai ouvert un autre cas et je regrette que qqn en soit vexé; toi peut être vu que l aquestion ne passionne pas les foule spour l'instant.

Pour répondre à ta question, je suis peu sur de moi c'est certain mais ta question me déroute: où ai je déclaré wb1 et ws1 ?
Normalemnt juste au dessus comme tu peux le voir ou alors je me suis trompé ?
Pour le format range, oui, c'est vrai, bien vu.
Par contre, non, même résultat en définissant la plage comme range.
Il doit y avoir une autre erruer dans cette formeule ou elle n'est pas correcte du tout, sur le principe.

Non ?