Help with Pause Code and then Resuming

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.
 
G

Guest

Found my own answer... Sorry.

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

Need to open it as a Dialog.
 

Ask a Question

Want to reply to this thread or ask your own question?

You'll need to choose a username for the site, which only take a couple of moments. After that, you can post your question and our members will help you out.

Ask a Question

Top