UserFormda Önizlemeden Dönüşte sorun

[dEdE]

Merhaba Xl Dostları,
Aşağıdaki kodlarla UserFormu gizleyerek baskı önizleme yapıyorum.

Private Sub CommandButton1_Click()				
    Me.Hide							
    Sheets("Sayfa1").PrintPreview					
    Me.Show							
    							
    Devamsor = MsgBox("Yazdırmaya Devam Edecek misiniz?  ", vbYesNo + vbQuestion, "YAZDIRMAYA DEVAM MI?")				
    If Devamsor = vbNo Then Exit Sub					
End Sub

Baskı önizlemeden dönünce Msgbox açılmıyor.
Ancak UserForm u kapatırsam Msgbox u görebiliyorum.
Me.Show ifadesi ile Userform görüntülendikten sonra MsgBox UserForm üzerinde görüntülenemez mi?

 

[uzmanamele]

Merhaba

Bunu deneyiniz.

Me.Show 0

 

[snx111]

http://excel.web.tr/f127/msgbox-show-modal-0-yapmak-t116072.html

 

[dEdE]

Teşekkürler,

Me.Show 0

Sorunu çözdü.
Buradaki 0 parametresi ne anlama geliyor, başka seçenekleri de var mıdır? Biraz açıklama yapabilir misiniz. Balık için teşekkürler ama biraz da balık tutmayı öğrenmek istiyorum.

Sayın snx111'in önerilerini henüz deneyemedim. Hafta sonu zaman ayırıp deneyeceğim.

 

[Korhan Ayhan]

Merhaba,

Formlarınızı bu modda açtığınızda arkada excel çalışma sayfaları görünüyorsa mouse ile tıklayıp işlem yapabilirsiniz. Bu modda formunuzu açmadığınızda excel sayfanıza müdahale edemezsiniz.

Bu modun dışında bildiğim kadarıyla başka seçenekleri yoktur.

 

[dEdE]

Sayın Ayhan, açıklama için teşekkürler,

Sayın snx111, verdiğiniz örnekler de aynı şekilde işi yaradı. Her iki yöntem de sorunumu çözdü.

Tekrar teşekkürler.

Saygılar.