Sayfa Önizlemesi Yapabilmek

[Ergün Güler]

Selam,

Bir Userform üzerindeki CommandButton'a aşağıdaki kod ile bir sayfanın ön izlemesini atadım.

ss.PrintPreview

Ancak, Sayfanın önizlemsini Userform'un arkasında görünüyor. Bunu nasıl önde görünmesini sağlayabilirim?
Yanlız Userform'un kapanmaması gerekiyor. Çünkü Userform üzerindeki yaptığım listeleme gibi işlemlerin tekrar etmemem lazım. Bir de mümkünse önizleme kapatıldığında tekrar aynı form dönmesi mümkün müdür?

Yardımcı olabilirsenizi çok sevinirim.

İyi çalışmalar.

 

[Mahir64]

UserForm1.Hide
ss.PrintPreview

bu şekilde deneseniz.

UserForm1.Hide=userformunuzun adı varsa onunla değiştirin.

 

[uzmanamele]

merhaba

bunu deneyiniz.

Sub ön_izleme()
UserForm1.Hide
ss.PrintPreview
End Sub

 

[Ergün Güler]

Selam,
Sayın blackLord ve Sayın Uzmanamele,

Çok teşekkür ederim. Verdiğiniz kodlar ile önizlemeyi görebildim. Ancak, önizlemeyi kapatınca tekrar aynı userform'ın görünmesini istiyorum, yapamadım.
Yardımcı olabilirseniz sevinirim.
İyi çalışmalar.

 

[Mahir64]

UserForm1.Hide
ss.PrintPreview
userform1.show

 

[Ergün Güler]

UserForm1.Hide
ss.PrintPreview
userform1.show

Selam,
Sayın Black Lord, yardımlarınız için çok teşekkür ederim. tam istediğim gibi oldu bir de verdiğiniz kodları aşağıdaki kodların arasına alınca daha da hızlı çalışıyor.
Ayrı bir sorum olacak;
ss.PrintPreview(EnableChanges) yazıp arantezden sonraki çıkan EnableChanges özelliği nedir nasıl kullanılır?

İyi çalışmalar.

Application.ScreenUpdating = False
Application.Calculation = xlCalculationManual

Me.Hide
ss.PrintPreview
Me.Show

Application.Calculation = xlCalculationAutomatic
Application.ScreenUpdating = True