View Single Post
  #2   Report Post  
Posted to microsoft.public.excel.misc
Bernie Deitrick Bernie Deitrick is offline
external usenet poster
 
Posts: 5,441
Default 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