VLookup - Fichier pour la recherche

Bonsoir,
J'ai un petit code qui permet en double-cliquant sur une cellule de ramener la valeur de correspondance dans une table. (recherchev).

Mainteant je souhaite que mon fichier Toto.xls cherche dans Table.xls
Est il possible d'indiquer le chemin du fichier excel conteant la table

---

Private Sub Workbook_SheetBeforeDoubleClick(ByVal Sh As Object, ByVal Target As Range, Cancel As Boolean)

Nomcell = ActiveCell.Address
Set Macell = Range(Nomcell)
'MsgBox Macell

On Error Resume Next
 
Set Plage = Sheets("Table").Range("A:B") ' nom du fichier pour la recherche  ?
rech = Application.WorksheetFunction.VLookup(Macell, Plage, 2, False)

    If rech <> "" Then
          MsgBox rech
          Else
          MsgBox "Rien trouvé"
    End If
   
End Sub

---

salut,

à moins de passer par la fonction ExecuteExcel4Macro, tu devras ouvrir le fichier (WorkBooks.Open(...)) pour pouvoir traiter avec les données de celui-ci.

@++

---

( Nouveau forum : Exclusivement Office & VBA

Je ne pense pas qu'on puisse lire une plage complete avec ExecuteExcel4Macro

Sinon j'ai mis 
Set Plage = Workbooks("table.xls").Sheets("Table_Cap").Range("A:B")
mais il faut que le fichier Table.xls soit ouvert

@++

---

( Nouveau forum : Exclusivement Office & VBA

on recommence..

Oui, c'est ce que je disais ^^
^faut l'ouvrir (le classeur) pour pouvoir traiter ses données

@++

---

( Nouveau forum : Exclusivement Office & VBA/STRONG>

As-tu essayé en mettant TOUT le chemin du fichier ?

tu écris
Set Plage = Workbooks("table.xls").Sheets("Table_Cap").Range("A:B")

essaie
Set Plage = Workbooks("C:\Repertoire\table.xls").Sheets("Table_Cap").Range("A:B")
en y mettant le bon chemin, bien sûr ...

MPi

@++

---

( Nouveau forum : Exclusivement Office & VBA

rahhh ça me gonfle, ça fait 2 fois ^^

bref, je disais que pour l'ouvrir, (avec Open) il faut le chemin et le nom fichier, par contre, pour le référencer comme tu le fais MPi, il me semble que (vu qu'il est ouvert) seul le nom du classeur suffit pour référencer la plage

@++

---

( Nouveau forum : Exclusivement Office & VBA/STRONG>

Le fantôme des messages est revenu...

En fait, ce que je voulais dire, c'est de mettre le chemin complet SI il n'est pas ouvert. Autrement, tu as raison, seul le nom devrait suffire.

MPi

Mais il me semblait que tu ne pouvais pas lire les données si le fichier n'était pas ouvert ?
(et donc sans passer par ExecuteExcel4Macro)

Me trompe-je ? 

@++

---

( Nouveau forum : Exclusivement Office & VBA/STRONG>