[AccessD] ...close open forms

Hi William

How about:

  ' Close all forms except this first opened form.
  For lngF = Forms.Count - 1 To 1 Step -1
    DoCmd.Close acForm, Forms(lngF).Name, acSaveYes
  Next

/gustav

>>> wdhindman at bellsouth.net 18-01-2006 15:01:48 >>>
...I need to close any open forms ...other than designated forms ...and save 
their data ...before opening a called form ...from the called form.

...ie call a form open from a switchboard ...the called form checks for any 
other forms open, other than the sb, and closes them, saving their data, 
before it opens.

William