Command to close all open windows? 2

[PortyAL]

Hi

Just wondering if is there is a VBA command that will automatically close all open forms and reports etc. (including hidden ones), but leaving the main database window open?

Thanks

AL

 

[Remou]

You could build a function easily enough using the forms and reports collection. This could then be assign to a hot key with an AutoKeys macro, if required.

 

[PortyAL]

Thanks.

I've never used collections before so I'm a bit unsure as to how to go about this.

AL

 

[PHV]

A starting point:

For i = Forms.Count - 1 To 0 Step -1
  DoCmd.Close acForm, Forms(i).Name
Next

Hope This Helps, PH.
FAQ219-2884
FAQ181-2886