承接上篇经验，本篇经验将和大家分享加载宏的实例应用——【如何设置工作表的打印密码？】
方法/步骤
-
1
在工作表中，点击菜单栏【开发工具】，在其工具栏内，点击【visual basic】!
-
2
会进入VBA编辑界面！双击左侧栏加载宏【new.xlam】中的【thisworkbook】！
-
3
在弹出的代码编辑窗口中的左下拉箭头中选择【app】,右下拉箭头中选择【WorkbookBeforePrint】！
-
4
在代码编辑窗口中输入一下代码：
Private Sub app_WorkbookBeforePrint(ByVal Wb As Workbook, Cancel As Boolean)
i = InputBox("请输入打印密码")
If i = "112365" Then
Cancel = False
Else
Cancel = True
MsgBox "密码不正确不能打印！"
End If
End Sub
-
5
点击保存后，关闭EXCEL工作簿！
-
6
重新打开任意EXCEL工作簿！点击【打印】按钮，都会弹出要求输入打印密码的对话框！
-
7
只有正确输入密码后，才可以打印！否则提示【密码不正确不能打印！】
END
经验内容仅供参考，如果您需解决具体问题(尤其法律、医学等领域)，建议您详细咨询相关领域专业人士。
作者声明：本篇经验系本人依照真实经历原创，未经许可，谢绝转载。
展开阅读全部
文章评论