Giúp code xác định máy in bị lổi (1 người xem)

Liên hệ QC

Người dùng đang xem chủ đề này

minhtuan55

Thành viên bị đình chỉ hoạt động
Thành viên bị đình chỉ hoạt động
Tham gia
23/3/16
Bài viết
705
Được thích
52
Mình cần 1 đoạn code để xác định máy in mất điện hoặc bị lổi. Vì mình dùng code sau để in mày in này dùng cổng LAN để xa cách 30 mét. Nếu mình muốn nếu máy in bị lổi hoặc chưa cắm điện thì hiện lên 1 bảng thông báo gì gì đó. Thanks

Sub in()
Application.ActivePrinter = Sheets("Thongtinsudung").Range("D29").Value
ActiveWorkbook.Sheets("inhoadon").PrintOut Copies:=1, ActivePrinter:=Sheets("Thongtinsudung").Range("D29").Value, Collate:=True
End sub
 
Web KT

Bài viết mới nhất

Back
Top Bottom