Başka sayfayı yazdırma

[xternet]

Merhaba arkadaşlar.

Bir çalışma kitabının sayfasından başka bir sayfaya "yazdır" komutu vemek istiyorum.

Sub yazdır_t2()
Sheets("TUTANAK2").PrintOut Copies:=1
End Sub

Bu komutu buradaki bir konudan aldım. Fakat bu komutla birlikte excel "tutanak_t2" sayfasına gidiyor ve sayfada yazdır komutu çalıştıktan sonra tekrar komutun verildiği sayfaya geri dönüyor. Benim isteğim komut verildiğinde "tutanak_t2" sayfasına gitmeden o sayfanın yazdırılması.

Eğer mümkünse yardımlarınızı bekliyorum. Aslında yukarıdaki kodda işimi görüyor ama görsellik açısından böyle daha güzel olucak gibi.

Herkese kolay gelsin.
İyi çalışmalar.

 

[Korhan Ayhan]

Selamlar,

Aşağıdaki şekilde denermisiniz.

Sub YAZ()
    Application.ScreenUpdating = False
    Sheets("TUTANAK2").PrintOut Copies:=1
    Application.ScreenUpdating = True
End Sub

 

[xternet]

Teşekkürler Sayın COST_KONTROL. Kod düşündüğüm gibi çalışıyor.

İyi çalışmalar.

 

[alparslan220]

gizli sayfayı nasıl yazdıra bilirim şimdiden tşkler acill ama