vlookup po vseh listih zunanje datoteke

Rabim Vlookup funkcijo, ki bi mi preiskala VSE liste določene datoteke.
Parametri, ki bi jih funkciji podal bi bili Look_Value in Filename.
Čisto zadovoljen bom, če nazaj dobim boolean.

Se pravi VlookupFile(A2; "file")
Aja, datoteka po kateri iščem je na strežniku, če to igra vlogo
(\\steznik\mapa\mapa\se ena mapa\datoteka.xls)

Sem veliko brskal in sem našel spodnji približek, ki pa na žalost ne dela.

=vlookallbooks( "Joel", A1:C5,2,FALSE, "c:\temp\book2.xls")


Function vlookallbooks( _
Look_Value As Variant, _
Tble_Array As Range, _
Col_num As Integer, _
Range_look As Boolean, ParamArray wkbks())

Dim wSheet As Worksheet
Dim vFound

On Error Resume Next

found = False
For Each wkbk In wkbks
Set Searchbook = Workbooks(wkbk)
For Each wSheet In Searchbook.Worksheets
With wSheet
Set Tble_Array = .Range(Tble_Array.Address)
vFound = WorksheetFunction.VLookup _
(Look_Value, Tble_Array, _
Col_num, Range_look)
End With
If Not IsEmpty(vFound) Then
found = True
Exit For
End If
Next wSheet
If found = True Then Exit For
Next wkbk

Set Tble_Array = Nothing
vlookallbooks = vFound

End Function

vir: http://www.eggheadcafe.com/software/asp...

Skozi vse liste že gre (sem našel na netu).
problem je v tem, ker ima sodelavka svojo datoteko,
jaz pa svojo (si pa pomagam z njenimi podatki)

Če bi imela ona vse na enem listu bi bilo idealno,
ampak ženske prepričat v to... je lažje najti funkcijo ;-)