社区应用 最新帖子 精华区 社区服务 会员列表 统计排行
  • 824阅读
  • 1回复

[分享]巧用宏指令拒绝Excel2007文件打印

楼层直达
级别: FLY版主
发帖
65046
飞翔币
24349
威望
30008
飞扬币
127770
信誉值
35

现在的办公越来越倾向于无纸化办公了,Excel2007的应用也变得比较频繁了。但是在Excel2007的操作过程中我们可能会不小心碰到了打印按钮或者一些人不太注重节约,比较随意打印Excel2007文件,甚至是直接禁止一般人打印Excel2007文件。在不影响Excel2007文件的编辑保存等成长操作情况下我们该如何拒绝文件打印呢?  

其实这是比较简单的,我们只需要利用一段宏指令即可解决,具体操作如下:  

按下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,都不能直接打印,只会显示你在宏指令中输入的提示语“节约用纸 拒绝打印”。这也让大家知道不能打印的原因是有意为之,而不是硬件或软件有什么问题。

 
不患人之不已知,患不知人也!
人生在世,如身处荆棘之中,心不动,则人不妄动;记住该记住的,忘记该忘记的;改变能改变的,接受不能改变的!
级别: 光盘硕士
发帖
29692
飞翔币
3980
威望
11672
飞扬币
359
信誉值
0

只看该作者 1 发表于: 2008-12-20
对文字处理的人是有用的