MS Project 2003 Close Print Preview

I am using an userForm to perform various tasks (applying filters, sorts, etc)

I have a command button to take the current view and show the Print Preview

Code:

---


Private Sub cmdPrint_Click ()
FilePrintPreview
End Sub

---

However, I get not figure out hold to close the print preview through VBA. I have tried closing the active window, ViewApply to another view, none work.

I would appreciate any help. Thanks

AM

What are you looking for a timer?

Might take a look at this. It's for Excel but I think you can apply it to MSProject. I don't have project so that's about all I can do to help you.
http://www.xcelfiles.com/API_02.html

Scroll to the bottom of the page and Ivan shows how to incorporate the timer into a 5 second printpreview.

I might use that timer for something else I am working on.

For this, I really just want the user to push a button and have the Print Preview close.

I am using a userForm, so for the user to use the normal CLOSE button, they have to close the userform which I do not want.

I have tried recording a macro, but it only shows the open and no code for the close.

As I said, closing the activewindow, etc has not worked.

So If I understand...you are opening a printpreview with the userform still open and so it is in front of your preview?

Why not just close or hide the userform while the preview is shown and when they close the preview have your userform come back into view?

That is doable. How do you suggest calling it back up? I am not finding anything in VBA for project that recognizes the event of print preview.

This works for me in excel....

Code:

---

Private Sub CommandButton1_Click()
Unload UserForm1
ActiveWindow.SelectedSheets.PrintPreview
UserForm1.Show
End Sub

---

Following that train of thought this might work for you in Project if the code you posted in the beginning of this thread brings up printpreview for you.

Code:

---

Private Sub cmdPrint_Click()
    Unload UserForm1
    FilePrintPreview
    UserForm1.Show
End Sub

---

You will need to change the userform1 to refect your actual userform's name.

That didn't work, but I figured out a work around

I made a custom toolbar with a button to call the userform back up. So from the print preview, the user closes the print preview and then click the button to bring the userForm menu back up.