Open an excel file
 

I have a program that open an excel file from file selected cell (see below).
However, I have problem to create an offset. What I want is to have the
program to read the new work order number as a third directory and then read
the filename.

Could you please help me with this matter?

Thanks in advance.
Maperalia


A B C D
E
1 WORK ORDER Location Cut FILENAME
2 2563 AA 11 AA @ 11.xls
3 2564 BB 22 BB @ 22.xls
4 2565 CC 33 CC @ 33.xls



Sub OpenSelectFilename()

Dim dcell As Range

Set dcell = ActiveSheet.Range("Bi")
directory = "S:\test\pants\" & dcell.OFFSET(-3, 0).Value & "\"
filetext = Selection.Value & ".xls"
Workbooks.Open directory & filetext
End Sub

Open an excel file
 

Hi,

Could Vlookup() solve your problem ...?

HTH


--
Carim
------------------------------------------------------------------------
Carim's Profile: http://www.excelforum.com/member.php...o&userid=33259
View this thread: http://www.excelforum.com/showthread...hreadid=531755

Open an excel file
 

Carim;
Thanks for your quick respond. I wondfer if you can help me to get the
statement done because I replace waht you advised me I did not work..

Thanks.
Maperalia

"Carim" wrote:


Hi,

Could Vlookup() solve your problem ...?

HTH


--
Carim
------------------------------------------------------------------------
Carim's Profile: http://www.excelforum.com/member.php...o&userid=33259
View this thread: http://www.excelforum.com/showthread...hreadid=531755

Open an excel file
 

Basically, I have this program (see below) that I want to pick up the value
from the row "B". Which is located 3 columns on the left side in the same
row. Everytime will be a new value in in the column "B". Therefore the
program have to read this value in order to open the file in the work order.

Thanks in Advance.
Maperalia






Sub OpenSelectFilename1()
Dim WO As String

WO = Worksheets("Sheet1").Range("B3")

directory = "C:\test\Pants\" & WO & "\"
filetext = Selection.Value & ".xls"
Workbooks.Open directory & filetext
End Sub




"Carim" wrote:


Hi,

Could Vlookup() solve your problem ...?

HTH


--
Carim
------------------------------------------------------------------------
Carim's Profile: http://www.excelforum.com/member.php...o&userid=33259
View this thread: http://www.excelforum.com/showthread...hreadid=531755