Yazıcı seçimi

[Ali Excel Öğreniyor]

Merhabalar
Ben bir yazdırma programı yaptım fakat şöyle bir şey istiyorum
Yazdır butonuna bastığımda eğer "pantum 250 series" isimli yazıcı seçili ise devam etsin, ama başka bir yazıcı seçili ise yazıcı seçme ekranını getirsin
Şimdiden teşekkürler
Şirket dosyası olduğu için dosyayı paylaşamıyorum

 

[bycakir]

hocam excell pc varsayılanı ne ise onu görür direk diye biliyorum.
yada yazıcı makrosundan once msgbox ile yazıcıyı kontrol et diye uyarı verdirebilirsiniz.

 

[Ali Excel Öğreniyor]

hocam excell pc varsayılanı ne ise onu görür direk diye biliyorum.
yada yazıcı makrosundan once msgbox ile yazıcıyı kontrol et diye uyarı verdirebilirsiniz.

Malesef hocam active.printer ile galiba fakat yazıcımın ıp adresini bulamadım

 

[ÖmerBey]

Merhaba,
Aşağıdaki şekildeki bir yapı işinizi görecektir sanıyorum.
Burada dikkat edeceğiniz husus yazıcı isminin görünenden farklı olacağıdır. Şurada yer alan kod ile bilgisayarınızdaki yazıcı isimlerini listeleyebilirsiniz.

If Application.ActivePrinter Like "*pantum 250 series " Then
    'devam et
Else
    Application.Dialogs(xlDialogPrint).Show
End If

 

[Ali Excel Öğreniyor]

Merhaba,
Aşağıdaki şekildeki bir yapı işinizi görecektir sanıyorum.
Burada dikkat edeceğiniz husus yazıcı isminin görünenden farklı olacağıdır. Şurada yer alan kod ile bilgisayarınızdaki yazıcı isimlerini listeleyebilirsiniz.

If Application.ActivePrinter Like "*pantum 250 series " Then
    'devam et
Else
    Application.Dialogs(xlDialogPrint).Show
End If

Teşekkürler hocam