• DİKKAT

    DOSYA İndirmek/Yüklemek için ÜCRETLİ ALTIN ÜYELİK Gereklidir!
    Altın Üyelik Hakkında Bilgi

Prİnt Makrosu

Katılım
27 Aralık 2005
Mesajlar
213
Excel Vers. ve Dili
OFFICE-2003 Türkçe
Sayfa 1 de gerekli bilgileri girdikten sonra oluşturduğum bir butona basarak Sayfa 2' yi print etmek istiyorum nasıl bir makro yazmak gerekiyor
yardımcı olursanız sevinirim
 
Aşağıdaki kodu kullanabilirsiniz.

Kod:
sheets("sayfa2").printout
 
Aşağıdaki kodu kullanabilirsiniz.

Kod:
sheets("sayfa2").printout

Makro olan bir sayfaya son satıra bu kodu ekledim. Print alacağıma "dosyaadı.mdi" diye farklı kaydet penceresi açılıyor. Makrolu sayfaya print komutu nasıl yazırabilirim?

Teşekkürler...
 
şu kodu ekleyip dener misiniz...
Kod:
ActiveWindow.SelectedSheets.PrintOut
ayrıca pcnize veya ağa bağlı bir yazıcı olduğundan emin olun veya aktif yazıcıyı kontrol edin bu durum sadece pcye bağlı veya ağdan bağlanılan bir yazıcı olmadığında MS Office'in belgeyi Document Imaging biçimiyle saklaması demektir ii akşamlar...
 
Yine aynı "dosyaadı.mdi" diye farklı kaydet penceresi açılıyor."
Makro da debug diyor.

Teşekkürler..
 
Printout satırını yazdığınız, kodun tamamını buraya kopyalar mısınız?
 
Sayın leventm 'in yazdığı kodu şöyle değiştirin,

Kod:
 [LEFT]sheets("sayfa2").printprewiew[/LEFT]

Bu önizleme yapmaktır. Eğer Önizleme halinde açılıyorsa, Sayın emrexcel123'ün dediği gibi yazıcı bağlantılarınızda sorun var demektir.​
 
Sayın AS3434,

En son sizin söylediğiniz kodu yazdım. Dosya ekte..

Saygılar..
 
Kod:
s1.Select
ActiveSheet.PageSetup.PrintArea = "$A$1:$F$28"
ActiveWindow.SelectedSheets.[B]PrintPreview[/B]

Bu haliyle bir deneyin. Yazdırmak için
.printprewiew
kısmını
.printout
yapın.
 
Kod:
s1.Select
ActiveSheet.PageSetup.PrintArea = "$A$1:$F$28"
ActiveWindow.SelectedSheets.[B]PrintPreview[/B]

Bu haliyle bir deneyin. Yazdırmak için
.printprewiew
kısmını
.printout
yapın.


Sonsuz teşekkürler.. Yine Hızır gibi yetiştiniz , Allah razı olsun.
 
selam benim benzer bir sorum olacak
mesela sayfa1 e makro ekleyip sayfa2 den 2 çıktı sayfa3 ten 4 adet çıktı ve sayfa4 ten 3 çıktı almak istiyorum makro nasıl olacak yardımcı olursanız sevinirim
 
Geri
Üst