*)Vô hiệu hóa phím nóng Ctrl+PCác bạn giúp mình cách vô hiệu hóa phím Ctrl+P va lệnh print từ menu file của excel nhé. Ths alots.
Sub XoaCtrlP()
Application.OnKey "^p", ""
End Sub
Private Sub Workbook_BeforePrint(Cancel As Boolean)
Cancel = True
End Sub
Thanhk you ban nhiều lắm, mình làm được rồi.*)Vô hiệu hóa phím nóng Ctrl+P
Bạn thử chạy code sau:
*) Vô hiệu hóa hết (Không cho in)Mã:Sub XoaCtrlP() Application.OnKey "^p", "" End Sub
ThânMã:Private Sub Workbook_BeforePrint(Cancel As Boolean) Cancel = True End Sub