Hi, This is my code at module: Sub PrintForm() Application.PrintCommunication = False With ActiveSheet.PageSetup .PrintArea = "$A$1:$I$40" .PrintTitleRows = "$1:$3" .Zoom = 75 End With ActiveWindow.SelectedSheets.PrintOut Copies:=1, Collate:=True, _ IgnorePrintAreas:=False Application.PrintCommunication = True End Sub This is my code at Workbook object: Private Sub Workbook_BeforePrint(Cancel As Boolean) Cancel =True End Sub May I know how could I disable Print command but allow to print via macro, i.e. I would like to add a control that Macro PrintForm is only allowed to print through macro. Appreciate someone can help, thanks.

ใหม่

vba Print ได้รับอนุญาตผ่านมาโครเท่านั้น

Excel

วันเสาร์ที่ 15 กันยายน 2018

0 ตอบกลับ

เยี่ยมชม 2.4 พันครั้ง

โหวต

แก้

สวัสดี

นี่คือรหัสของฉันที่โมดูล:

แบบฟอร์มพิมพ์ย่อย()
Application.PrintCommunication = เท็จ
ด้วย ActiveSheet.PageSetup
.PrintArea = "$A$1:$I$40"
.PrintTitleRows = "$1:$3"
.ซูม = 75
จบด้วย
ActiveWindow.SelectedSheets.PrintOut สำเนา:=1, ตรวจทาน:=จริง, _
IgnorePrintAreaas:=False
Application.PrintCommunication = จริง
ย่อยสิ้นสุด

นี่คือรหัสของฉันที่วัตถุสมุดงาน:
สมุดงานย่อยส่วนตัว_ก่อนพิมพ์(ยกเลิกเป็นบูลีน)
ยกเลิก =True
ย่อยสิ้นสุด

ขอทราบวิธีปิดการใช้งานคำสั่งพิมพ์แต่อนุญาตให้พิมพ์ผ่านมาโครเช่น ฉันต้องการเพิ่มการควบคุมที่ Macro PrintForm ได้รับอนุญาตให้พิมพ์ผ่านมาโครเท่านั้น ขอบคุณใครบางคนสามารถช่วยได้ ขอบคุณ

ไม่มีคำตอบสำหรับโพสต์นี้

กรุณาเข้าสู่ระบบเพื่อโพสต์คำตอบ

คุณจะต้องเข้าสู่ระบบก่อนจึงจะสามารถโพสต์คำตอบได้ เข้าสู่ระบบโดยใช้แบบฟอร์มด้านขวาหรือลงทะเบียนบัญชีหากคุณใหม่ที่นี่ ลงทะเบียนที่นี่ "