You can disable the menu options: but this interferes with the user interface somewhat

Why not use the event

Sub Workbook_BeforePrint(Cancel As Boolean
Cancel = True ' Cancels printin
Your macr
End Sub