Try

Workbooks.OpenText
Filename:=Worksheets("Sheet1").Range("D6").Value



--
Cordially,
Chip Pearson
Microsoft MVP - Excel
Pearson Software Consulting, LLC
www.cpearson.com


"ThalesNate"
wrote
in message
...

Hi, all

I'm trying to build a macro that will allow users to input file
locations, I'm having a hard time getting the macro to
substitute cell
contents for a hard-coded string. I have this:

Workbooks.OpenText Filename:= _
"S:\Departments\Shop Public\Support\stats_liste_MvtStock.txt"
_

I would like to instead have something like this:

Workbooks.OpenText Filename:= _
"cell(D6)" _

In this case D6 would contain the file address on the network.
With
that accomplished, users can identify their source files
without
rooting around in the code. This can't be too hard, can it?

Thanks,

Nate


--
ThalesNate
------------------------------------------------------------------------
ThalesNate's Profile:
http://www.excelforum.com/member.php...o&userid=31037
View this thread:
http://www.excelforum.com/showthread...hreadid=549610