Assuming the workbook is open, you only need:

Set tLook = Workbooks("test.xls").Sheets("test").Range("P")

--

Vasant



"Carlos" wrote in message
...
Hello, i try use in VBA the Worksheetfuncion Vlookup with table lookup
another workbook.

Sub test()
Dim Look As Range
Dim tLook As Range

Set Look = Cells(2, 2)

---------------Error in next line ("P" is a name
range)-----------------
Set tLook = Workbooks("c:\temp\test.xls").Sheets("test").Range ("P")

ActiveCell = Application.WorksheetFunction.VLookup(Look, tLook, 10, 0)

End Sub

Any help is appreciate

Thanks