Thread: Print Preview
View Single Post
  #5   Report Post  
Dave Peterson
 
Posts: n/a
Default

This kind of thing worked ok for me:

Option Explicit
Private Sub CommandButton1_Click()
Unload Me
End Sub
Private Sub CommandButton2_Click()
Me.Hide
Application.Visible = True
ThisWorkbook.Worksheets("sheet1").PrintPreview
Application.Visible = False
Me.Caption = "Back from Print Preview"
Me.Show
End Sub

So just hiding and then showing should do what you want.

Greg wrote:

Thanks for that is it possible to get the program to resume from the same
userform which called for the preview or do I just have to have the
splashscreen show again?

Greg
"Dave Peterson" wrote in message
...
I think I'd make the application visible before the printpreview, too.

Then hide it again after.

When I tried your code, the printpreview window was also hidden.

Greg wrote:

Hi all, I am currently writing a program where I am just using
userforms.
I am going to have the application as hidden if you know what I mean.
What
I am asking is how to be able to use print preview. I have tried this
but I
cant seem to make it work. The trouble is it is stalling the program
because it will not show the print preview over the top of the userform.

How can I make this work. Here is the basic code I am using

Sheets("PEGS").Select
ActiveWindow.SelectedSheets.PrintPreview

Will this work when the application is not visible?

Thanks

Greg


--

Dave Peterson


--

Dave Peterson