ExcelBanter

ExcelBanter (https://www.excelbanter.com/)
-   Excel Discussion (Misc queries) (https://www.excelbanter.com/excel-discussion-misc-queries/)
-   -   Need VBA code for "Open Dialogue" box (https://www.excelbanter.com/excel-discussion-misc-queries/11907-need-vba-code-%22open-dialogue%22-box.html)

Brent E

Need VBA code for "Open Dialogue" box
 
Good morning.

I am using an Access VBA module to control Excel and I need to figure out
code that can simply change current directory to a set directory and then
show Excel's "Open" Diaglogue box. I am aware that I can use an open command
to open a certain file, but I don't want to do that. I want dialogue box and
not specify a file. Any suggestions? Thanks

Cordially,


hi,
i think it is:
Application.Dialogs(xlDialogOpen).Show

-----Original Message-----
Good morning.

I am using an Access VBA module to control Excel and I

need to figure out
code that can simply change current directory to a set

directory and then
show Excel's "Open" Diaglogue box. I am aware that I can

use an open command
to open a certain file, but I don't want to do that. I

want dialogue box and
not specify a file. Any suggestions? Thanks

Cordially,
.


Mark

Hi,

chDir "c:\Here\Mummy"

application.dialogs("Open").show
workbooks.open Filename

Filename is the filename

Something like this. You have to specify the filename
property then

If you are game, you can steal my code from one of my
utilities: EasyText_Rev1.xls

at:
http://www.geocities.com/excelmarksway

The code is not password protected but you will have to
modify it to suit your needs.


- mark









-----Original Message-----
Good morning.

I am using an Access VBA module to control Excel and I

need to figure out
code that can simply change current directory to a set

directory and then
show Excel's "Open" Diaglogue box. I am aware that I can

use an open command
to open a certain file, but I don't want to do that. I

want dialogue box and
not specify a file. Any suggestions? Thanks

Cordially,
.



All times are GMT +1. The time now is 06:46 PM.

Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
ExcelBanter.com