Help with Pause Code and then Resuming

  • Thread starter Thread starter Guest
  • Start date Start date
G

Guest

I need help with how to make the code Pause and wait until I complete
something on a form then start back up to finish off. This is what I
currently have:

DoCmd.OpenQuery "qryUpdateOptionDesc"

If DCount("Model", "qryOptionBlanks") > 0 Then
DoCmd.OpenForm "frmAddOptionDesc", acFormDS, , , acFormEdit, acWindowNormal
DoCmd.OpenQuery "qryUpdateOptionDesc"
End If

Call SendtoExcel
DoCmd.Hourglass (False)
DoCmd.SetWarnings (True)

Call CompactDB


If there are any options that are blank or not in my tblOptions I need to
have that form open and wait until I enter the Option Descriptions and after
I close the form then finish sending it to Excel.

Thanks.
 
Found my own answer... Sorry.

DoCmd.OpenForm "form1", , , , , acDialog

Need to open it as a Dialog.
 
Back
Top