UserForm PrintPreview & Print buttons

[Guest]

Greetings and TIA for your time
I am a userform newbie
Using John Walkenbach's temp gif file method for showing a chart in a user
form, I've added a command button to my userform to get a print preview of a
chart:

Private Sub PrintPreviewButton_Click()
Sheets("Data").ChartObjects(1).Chart.PrintPreview
End Sub

This displays the print preview window, but the userform stays on top, has
the focus and cannot be closed. How do i give the focus to the print preview
window and (1) leave the userform open in the background, or (2) close the
user form.

Also from a userform command button I would like to show the Print dialogue
that normally appears from the file/print menu. This would need to be preset
ready to print the chart from the code above.

 

[Tom Ogilvy]

before you do the print preview, hide the userform

Userform1.hide

 

[Guest]

Thanks Tom for your response...
How can I get the print dialogue box to show from a userform?

 

[Tom Ogilvy]

application.Dialogs(xlDialogPrint).Show