禁止打印的方法

厦门行 · 发表于 2011-1-16 10:29

本帖最后由爱疯于 2012-9-21 00:34 编辑

　　其实这是比较简单的，大家我们只需要利用一段宏指令即可解决，具体操作如下：
　　按下Alt+F11打开VBA编辑器，如果VBA Project窗格没有显示的话就按下组合键Ctrl+R将其调出；右键单击“This Workbook”，选择“查看代码”，然后再代码窗口内输入：　

Private Sub Workbook_BeforePrint(Cancel As Boolean)
Cancel = True
MsgBox "节约用纸拒绝打印", vbInformation
End Sub

复制代码

　　然后我们按下组合键Alt+F11返回Excel2007。这样以后不管你是直接点击打印按钮，还是从“Office按钮”中选择“打印”，或者是使用快捷键Ctrl+P，都不能直接打印，只会显示你在宏指令中输入的提示语“节约用纸拒绝打印”。这也让大家知道打印机不能打印的原因是有意为之，而不是硬件或软件有什么问题。

风一样的男子 · 发表于 2011-1-16 11:02

{:1112:}{:1112:}{:1112:}

终点 · 发表于 2011-1-16 12:50

学习{:011:}

sunjing-zxl · 发表于 2011-1-19 20:29

学习学习再学习

ULCY · 发表于 2011-1-19 21:41

又学了一招，哈哈哈

TTTTT · 发表于 2011-1-21 10:25

学习，谢谢................

迎客松 · 发表于 2011-1-21 11:23

学习，{:1112:}{:1112:}

3dmax456789 · 发表于 2012-9-27 13:14

谢谢分享！学习！

aimeiling1986 · 发表于 2013-8-24 18:57

wcy586 · 发表于 2013-9-25 16:30

{:2112:}不错、支持一下！

		自动登录	找回密码
密码			注册

[分享] 禁止打印的方法

评分