sayfanın kenar boşlukları sayfanın yazdırılabilir alanı dışına ayarlanmış

[tukayf]

Merhabalar. Word'de sayfa kenar boşluklarını çok dar bırakarak yazdırma işlemi yapıyoruz. Bu işlemi yaparken PC her seferinde başlıktaki ya da buna benzer bir uyarı veriyor. Yazdır dediğimizde yazdırıyor ancak ben bu uyarıyı verdirmeden yazdırmasını istiyorum. Kodlarla yazdır komutu verilebildiği takdirde bu uyarıyı göstermeden yazdırmasını istiyorum. Makro oluşturdan yazdır dediğim zaman gene bu uyarıyı veriyor. Yardımlarınız için şimdiden çok teşekkürler.

 

[Emir Hüseyin Çoban]

. . .

Şu şekilde deneyiniz.

Sub Print_ShowNoMarginsWarning_DoNotShowPrintDialog()
    With Application
 [COLOR="Green"]       'Turn off DisplayAlerts[/COLOR]
    [B]    .DisplayAlerts = wdAlertsNone[/B]

 [COLOR="green"]       'Print document
        'Background print must be turned off to prevent message[/COLOR]
        .PrintOut [B]Background:=False[/B]

[COLOR="green"]        'Turn on DisplayAlerts again[/COLOR]
[B]        .DisplayAlerts = wdAlertsAll[/B]
    End With
End Sub

http://www.thedoctools.com/index.php?show=mt_print_without_margins_warning&lang=us

. . .

 

[tukayf]

Cevap için çok teşekkürler. Mesajınızı gün içerisinde nete oturamadığım için göremedim. İlk iş günü deneyip geri bildirim sağlarım size. Saygılarımla.