İstediğim Yazıcıyı Seçip Ona Yazdırmak

Katılım
15 Haziran 2021
Mesajlar
147
Excel Vers. ve Dili
Office 2016
Merhaba

Makroyu çalıştırdığım zaman o anki varsayılan yazıcı hangisi olursa olsun. etiket yazıcısına göndermek istiyorum. Bu yazıcı ağ üzerinde çalışmakta. yazıcının konumu şu şekilde "\\printsrv\gebp235a"

Şöyle bir kod ile yazıcıyı tanımlayıp :

Sub PrinterSec()
Application.ActivePrinter = "\\printsrv\gebp235a on Ne03:"
End Sub


Bu kodla yazdırmaya çalıştım :

'yazıcı seçtim
Call Module1.PrinterSec
'yazdirma islemi yapiyorum
Sheets("etiket").Select
Columns("A:C").Select
ActiveWindow.SelectedSheets.PrintOut Copies:=1, Collate:=True, _
IgnorePrintAreas:=False


fakat printer seç modülünde 1004 hatası veriyor. yazıcı yolunu mu doğru giremiyorum acaba?
 
Katılım
15 Haziran 2021
Mesajlar
147
Excel Vers. ve Dili
Office 2016
Evet biraz daha kurcalayınca yaptım.
 
Üst