farklı yazıcı

[zulfuernek]

ekteki dosyada userform yazdır butonuyla bilgisayara bağlı tanımlı yazıcıan çıktı alabiliyorum.

SORU: kredi no kısmına rakam yazınca kredi o yazdır butonu aktif oluyor ve ben butona tıklayınca yazıcıda tanımlı ana yazıcıdan değilde enim bilgisayarımda bulunan yazıcıdan çıktı almak istiyorum.

çıktı alınacak sayfa: "SYSTEM" sayfasında "Y8" hücresi

bilgisayardaki yazıcı şu şekilde geçiyor:

Olivetti IBM X24 (LPT1)

 

[veyselemre]

Private Sub KREDİNO_YAZDIR_Click()
    Sheets("SYSTEM").PrintOut Copies:=1, Collate:=True, ActivePrinter:="Olivetti IBM X24 (LPT1)"
    'Sheets("SYSTEM").Range("Y8:AH8").PrintOut Copies:=1, Collate:=True, ActivePrinter:="Olivetti IBM X24 (LPT1)"

End Sub

 

[zulfuernek]

@veyselemre hocam emeğinize sağlık. tam istediğim gibi oldu. ayrıca hem tümsayfa hemde belirli alanı yazdırmak için kodları ayrı ayrı vermenizde ayrıca takdire şayan.

çok teşekkür ederim.