Thưa thầy trong bài tập in phiếu hàng loạt e có hai câu hỏi. Thứ nhất không may mk ấn vào nút gọi macro in hàng loạt vậy cách viết code nào để hỏi thử bạn có muốn in không nếu chắc chắn in thì mới ok. Thứ hai là trong lúc chạy macro in thì lm thế nào để n dừng đột ngột k in nữa trong lúc in nhầm. Mong thầy hướng dẫn ah
Câu 1. Bạn có thể tạo 1 userform, trong đó có 2 nút (command button): Xác nhận / Hủy.
Lệnh in là mở userform đó lên.
Khi nhấn nút xác nhận trong userform thì thực hiện lệnh in. Bấm nút Hủy thì đóng userform mà không in.
Câu 2: bạn có thể tham khảo code sau đây (chạy code này khi cần dừng lệnh in trong lúc máy đang nhận lệnh in):
Public Sub DungLenhIn_DotNgot()
Dim o As Object, ret
For Each o In GetObject("winmgmts:{impersonationLevel=impersonate}//./root/cimv2").ExecQuery("Select * from Win32_Printer")
ret = o.CancelAllJobs
Debug.Print o.Name, ret
Next
End SubThầy cho e hỏi s trong file bài tập in phiếu hàng loạt dùng advanfilter n toàn báo lỗi “you can only ....active sheet” e k biết là lỗi j