Look at GetOpenFilename in VBA help.

--
HTH

Bob Phillips

(replace somewhere in email address with gmail if mailing direct)

"Steven" wrote in message
...
I would like to automate the file open box/window. My code is:

On the Before Double-Click of the sheet:
------------------------------
Dim vChDir as String
vChDir = ActiveCell.Value
ChDrive Mid(vChDir,1,2)
ChDir vChDir
------------------------------
I tried SendKeys ("%FO") ... but that does not work.

How do you open the File/Open box?

Thank you for your help.

Steven