如下图所示的工作表,我希望在打开该工作簿时,用户能看到一条关于该工作簿用途的提示消息,如何编写VBA代码?
文章插图
答:有两种实现方法 。
第一种,使用Workbook_Open事件 。代码如下:
Private Sub Workbook_Open()
MsgBox “本工作簿用于记录个人私密信息,外人请勿观看!”
End Sub
注意,该代码一定要在ThisWorkbook模块中,如下图所示 。
文章插图
第二种,使用Auto_Open()事件 。在VBE中,插入一个标准模块,输入下面的代码:
Sub Auto_Open()
MsgBox “本工作簿用于记录个人私密信息,外人请勿观看!”
【怎么实现打开工作簿就自动运行VBA代码?】End Sub
注意,该代码在标准模块中,且过程名为Auto_Open,如下图所示 。
文章插图
用途
使用该方法,可以在打开工作簿时:
1.给用户提示,无论是警告提示还是操作提示 。
2.自动加载自定义的内容,包括定制的界面 。
3.加密工作簿,只有用户输入正确的密码,才能打开工作簿 。
推荐阅读
- 怎么使用excel公式实现自动排序?
- 怎么使用VBA创建文件夹?
- 怎么使用VBA将文件或文件夹删除到回收站?
- 怎么获取多个excel表格中公司最近的一条记录?
- excel表单怎么实现逐条批量打印?
- 怎么将excel单元格中的数字和文本分开?
- 怎么强制excel用户启用宏?
- 淘宝补单的快递号怎么来?问题怎么处理?
- 淘宝关联营销应该买哪个?具体怎么做?
- 淘宝个人信息被盗用怎么办?怎么处理?