DialogPrinterSetup penceresinde İPTAL neden çalışmıyor?

[aliakgul]

İyi akşamlar arkadaşlar,
Application.Dialogs(xlDialogPrinterSetup).Show komutu ile açılan yazıcı seçenek penceresindeki İPTAL düğmesini tıklayınca yine de yazdırma görevi veriliyor. Yazıcı seçim penceresi ile birlikte işlemin iptal edilmesi gerekmez mi???
İlgilenen arkadaşlara şimdiden teşekkürler...

 

[Korhan Ayhan]

Selamlar,

Ali bey bu pencereyi hangi kodla çağırıyorsunuz ?

 

[aliakgul]

Selam,
Hocam ilgili pencereyi çağırdığım kod aşağıdadır.

Application.Dialogs(xlDialogPrinterSetup).Show

Saygı ve muhabbetle...

 

[Ayhan Ercan]

Merhaba sayın aliakgul

Çağırmış olduğunuz kod ile pc ve ağınızda mevcut printerlerin ayarlarını görebiliyorsunuz. Tamam veya İptal ile orda görünen yazıcılarla yazdırma veya yazdırmayı iptal etmiş olmuyorsunuz. (Dikkat ederseniz pencere başlığında "Yazıcı Ayarları" diye yazıyor.)

Kanaatimce kodunuzun devamı ile ilgili bir sıkıntınız var.

 

[aliakgul]

If MsgBox("Sipariş listesi yazılsın mı???", vbYesNo, "uyarı...") = vbNo Then Exit Sub
        Application.Dialogs(xlDialogPrinterSetup).Show
        Sayfa2.PrintOut

Tekrar merhaba,
Kodlar belirttiğim gibi. Yapmak istediğim ise, yazıcı seçenekleri penceresinde iptali tıkladığımda pencerenin kapatılmasının yanında,yazdırmanın da iptali idi.Ancak kod satırlarının yerlerini değiştirerek sanırım aynı sonucu elde edebileceğim...