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