Ed, I've tried this. It is the ideal solution I'm looking for, but I encoded
the application on Windows 7, and when I transferred it to my Vista Laptop,
I got a runtime error 1004:
'..\Desktop\403.csv' could not be found.

It is on the local desktop. What could be wrong?

Jim


"Ed Ferrero" wrote in message
...
This will work for any user, no need to get the user name

Workbooks.Open Filename:="..\Desktop\403.csv"

But if you really want to manipulate strings

UserName = Range("G5").Value
strPath1 = "C:\Users\"
strPath2 = "\Desktop\403.csv"
strFileNamePath = strPath1 & UserName & strPath2

Workbooks.Open Filename:=strFileNamePath

Ed Ferrero
www.edferrero.com

"Jim Berglund" wrote in message
...
I want to be able to open a file from any users desktop.
From my desktop, the command is
Workbooks.Open Filename:="C:\Users\Jim\Desktop\403.csv"

How do I automate this, using UserName = Range("G5").Value

So that if the user enters 'Dave' into G5, the code line will change to
Workbooks.Open Filename:="C:\Users\Dave\Desktop\403.csv" ?

Thanks, Jim Berglund