printpriview

[sametumur]

arkadaşlar merhaba,

aşağıdaki kodları kullanarak userform üzerindeki button ile sayfayı önizleme yapıyorum.

soru: önizleme yapınca sol üst köşedeki "yazdır, sayfa yapısı, yakınlaştır, baskı önizlemeyi kapat" şeklindeki butonlar aktif olarak geliyor. bu butonlar nasıl pasif hale getirilir.

ben önizlemeden yalnızca görünsün; herhangi bi işlem yapılsın istemiyorum.


userform1.hide
application.visible=true
sheets("Y").printpreview
application.visible=false
userform1.show

 

[sametumur]

Konu hakkında yardımcı olabilecek var mı?

 

[Korhan Ayhan]

Linki inceleyiniz.

http://www.excel.web.tr/f48/basky-nizlemede-yazdyrmama-t155401.html

 

[sametumur]

maalesef linkteki kodlar işimi görmedi. bu konuda faklı bir uygulama veya önerisi olan?

veya

printpreview yaptıktan sonra yalnızca yazdır butonunu pasif yapabilir miyiz?

 

[Zeki Gürsoy]

Ribbon gizlenebilir. Aşağıdaki proseduru bir butona bağlayıp sonucu gözlemleyin.

Not: Önizleme moduna geçildiğinde kara bir ekran gelebilir. Kara bölüme fare ile bir kez dokunun.

[SIZE=2]Sub test()
    Application.ExecuteExcel4Macro "SHOW.TOOLBAR(""Ribbon"",False)"
    ActiveSheet.PrintPreview
    Application.ExecuteExcel4Macro "SHOW.TOOLBAR(""Ribbon"",True)"
End Sub[/SIZE]

 

[sametumur]

teşekkür ederim bu çözüm gayet güzel oldu.