Close form automatically upon opening workbook
Mark,
To open a file without running the auto_open macro or the open event, use
Application.EnableEvents = False
Workbooks.Open f, , , , "PASSWORD"
Application.EnableEvents = True
HTH,
Bernie
MS Excel MVP
"Ixtreme" wrote in message
...
Hi,
I have a form that is being displayed automatically upon opening the
workbook (I have added the following code in the workbook open event:
Private Sub Workbook_Open()
FrmMain.Show
End Sub
However, I have another workbook that imports information from this
(and many copies of this) workbook). It automatically opens the
workbook, however it halts on the userform that is being displayed. Is
there a possibility that the form is closed with VBA code?
Currently I have:
Path = ActiveWorkbook.Path & "\IMPORT\"
ChDir Path
f = Dir(Path & "*.xls")
While f < ""
Workbooks.Open f, , , , "PASSWORD"
Unload FrmMain
Sheets("Overview").Activate
The code stops on Unload FrmMain. Is there another way to bypass this?
Mark
|