Xin hỏi cách tắt thông Báo "Now Printing ..." khi in

[Davidsy]

Em đã đặt một lệnh Print trên Sheet để in sheet hiện hành ... em muốn tắt cái thống Báo "Now Printing ..." thì phải làm ntn? Các bác chỉ giúp em ...!
Cảm ơn nhiều nhiều!

 

[PhanTuHuong]

Bạn thử cấy thêm đoạn code này xem sao:

Application.DisplayAlerts = False

 

[Davidsy]

..........
Application.DisplayAlerts = False
Do something I like
Application.DisplayAlerts = True
..........
Rat cam on ban nhieu!

 

[tedaynui]

..........
Application.DisplayAlerts = False
Do something I like
Application.DisplayAlerts = True
..........

Mình đã test cách này nhưng không được. Mỗi lần in, nó vẫn hiện ra Msgbox Printing.
Vậy có cách nào khác để tắt cái Msgbox Printing này khi in không, các bạn chỉ giúp. Chứ vô vòng lặp in ra liên tục, màn hình chớp chớp khó chịu quá.

Xin cảm ơn!
TDN

 

[nghiaphuc]

Mình đã test cách này nhưng không được. Mỗi lần in, nó vẫn hiện ra Msgbox Printing.
Vậy có cách nào khác để tắt cái Msgbox Printing này khi in không, các bạn chỉ giúp. Chứ vô vòng lặp in ra liên tục, màn hình chớp chớp khó chịu quá.

Xin cảm ơn!
TDN

Chắc xài tạm cách này được đấy anh:
.....................
Application.ScreenUpdating = False
Do some thing you like
Application.ScreenUpdating = True
.....................

 

[tedaynui]

Thật ra mình đã dùng kết hợp cả 2 : ScreenUpdating và DisplayAlerts nhưng nó vẫn hiện cái Msgbox Printing đó ????

 

[Hai Lúa Miền Tây]

Thật ra mình đã dùng kết hợp cả 2 : ScreenUpdating và DisplayAlerts nhưng nó vẫn hiện cái Msgbox Printing đó ????

Hay là anh ẩn luôn cái ứng dụng Excel, khi in xong thì hiện lại, hỏng biết có phải vậy không, không dám test.

 

[tedaynui]

Hay là anh ẩn luôn cái ứng dụng Excel, khi in xong thì hiện lại, hỏng biết có phải vậy không, không dám test.

Kà kà, làm thế không được Dom à; nhìn vậy còn khó chịu hơn.
Vì cái Msgbox Printing này là của Win chứ không phải của Excel nên dùng lệnh của Excel có lẽ không điều khiển nó được rồi.

 

[nghiaphuc]

Thật ra mình đã dùng kết hợp cả 2 : ScreenUpdating và DisplayAlerts nhưng nó vẫn hiện cái Msgbox Printing đó ????

Thực ra thì cả 2 anh chàng Application.ScreenUpdating và Application.DisplayAlert đều chỉ can thiệp đến những gì xuất phát từ Excel thôi (nhìn đối tượng Application là biết), còn câu lệnh Application.ScreenUpdating=False chẳng qua là để cho màn hình đỡ "chớp chớp khó chịu" thôi. Theo em biết thì cái hộp thoại thông báo kia là của trình điều khiển máy in chứ không phải của Excel nên những câu lệnh VBA mà có dính dáng tới Application sẽ chẳng can thiệp được.
Ví dụ, em đang xài máy in Canon LBP 1120 thì khi nhấn lệnh in --> OK sẽ có 1 hộp thoại của trình điều khiển máy in, trên đó có 1 menu Options với lệnh Status Options. Nhấn lệnh này sẽ xuất hiện một hộp thoại, trong đó có mục Sounds cho âm thanh với 3 tùy chọn: Play all sound; Only play warning sound; Do not play any sound. Nếu chọn tùy chọn thứ 3 thì sẽ không có xuất hiện Msgbox Printing kia nữa.