Hello X-L Gurus!
I am using the GetOpenFileName method and I would like to have it open into a
predetermined folder. I wrote the code as follows:

ChDir "G:\MULTUS\PROVEOUT\"
strCurrentFile = Application.GetOpenFilename(, , "Please choose the file you
want to process.")

It opens in the "My Documents" folder instead. Any ideas?

Thank You,
-plh

PS:
I also tried
ChDir "G:\MULTUS\PROVEOUT"
strCurrentFile = Application.GetOpenFilename(, , "Please choose the file you
want to process.")
That is without the final "\" in the ChDir statement and got the same result.


--
Where are we going and why am I in this HAND BASKET??

Try this instead:

Private Declare Function SetCurrentDirectoryA _
Lib "kernel32" (ByVal lpPathName As String) As
Long

Function ChDirAPI(strFolder As String) As Long
'will return 1 on success and 0 on failure
'will work with a UNC path as well
'-----------------------------------------
ChDirAPI = SetCurrentDirectoryA(strFolder)
End Function

Then just replace your ChDir with ChDirAPI


RBS



"plh" wrote in message
...
Hello X-L Gurus!
I am using the GetOpenFileName method and I would like to have it open
into a
predetermined folder. I wrote the code as follows:

ChDir "G:\MULTUS\PROVEOUT\"
strCurrentFile = Application.GetOpenFilename(, , "Please choose the file
you
want to process.")

It opens in the "My Documents" folder instead. Any ideas?

Thank You,
-plh

PS:
I also tried
ChDir "G:\MULTUS\PROVEOUT"
strCurrentFile = Application.GetOpenFilename(, , "Please choose the file
you
want to process.")
That is without the final "\" in the ChDir statement and got the same
result.


--
Where are we going and why am I in this HAND BASKET??

Or have a look at the help file on the dialogs object

You need to be on drive G: before it will let you change directory

ChDrive "G"
ChDir "G:\MULTUS\PROVEOUT\"

"plh" wrote:

Hello X-L Gurus!
I am using the GetOpenFileName method and I would like to have it open into a
predetermined folder. I wrote the code as follows:

ChDir "G:\MULTUS\PROVEOUT\"
strCurrentFile = Application.GetOpenFilename(, , "Please choose the file you
want to process.")

It opens in the "My Documents" folder instead. Any ideas?

Thank You,
-plh

PS:
I also tried
ChDir "G:\MULTUS\PROVEOUT"
strCurrentFile = Application.GetOpenFilename(, , "Please choose the file you
want to process.")
That is without the final "\" in the ChDir statement and got the same result.


--
Where are we going and why am I in this HAND BASKET??

Make sure you change the drive, too:

Dim myFolder as string
myFolder = "G:\MULTUS\PROVEOUT\"
ChDrive myFolder
ChDir myfolder





plh wrote:

Hello X-L Gurus!
I am using the GetOpenFileName method and I would like to have it open into a
predetermined folder. I wrote the code as follows:

ChDir "G:\MULTUS\PROVEOUT\"
strCurrentFile = Application.GetOpenFilename(, , "Please choose the file you
want to process.")

It opens in the "My Documents" folder instead. Any ideas?

Thank You,
-plh

PS:
I also tried
ChDir "G:\MULTUS\PROVEOUT"
strCurrentFile = Application.GetOpenFilename(, , "Please choose the file you
want to process.")
That is without the final "\" in the ChDir statement and got the same result.

--
Where are we going and why am I in this HAND BASKET??

--

Dave Peterson

Worked Swimmingly, Thank You!
-plh
In article , Dave Peterson says...

Make sure you change the drive, too:

Dim myFolder as string
myFolder = "G:\MULTUS\PROVEOUT\"
ChDrive myFolder
ChDir myfolder





plh wrote:

Hello X-L Gurus!
I am using the GetOpenFileName method and I would like to have it open into a
predetermined folder. I wrote the code as follows:

ChDir "G:\MULTUS\PROVEOUT\"
strCurrentFile = Application.GetOpenFilename(, , "Please choose the file you
want to process.")

It opens in the "My Documents" folder instead. Any ideas?

Thank You,
-plh

PS:
I also tried
ChDir "G:\MULTUS\PROVEOUT"
strCurrentFile = Application.GetOpenFilename(, , "Please choose the file you
want to process.")
That is without the final "\" in the ChDir statement and got the same result.

--
Where are we going and why am I in this HAND BASKET??



--
Where are we going and why am I in this HAND BASKET??