如何让EXCEL文件只能在某台计算机上打开的VBA代码
如何让EXCEL文件只能在某台计算机上打开的VBA代码
发布时间:2016-12-23 来源:查字典编辑
摘要:如何让某个EXCEL文件,限制在某台电脑上打开,而其它电脑不能打开该EXCEL文件。这得借助VBA代码来实现。只需要在工作薄打开的事件中,添...

如何让某个EXCEL文件,限制在某台电脑上打开,而其它电脑不能打开该EXCEL文件。

这得借助VBA代码来实现。

只需要在工作薄打开的事件中,添加如下代码即可。

Private Sub Workbook_Open()

Application.ScreenUpdating = False

On Error GoTo 100

Workbooks.Open ThisWorkbook.Path & "/验证.XLS"

ActiveWorkbook.Close False

Exit Sub

100:

MsgBox "你无权使用该文件"

ThisWorkbook.Close False

Application.ScreenUpdating = True

推荐文章
猜你喜欢
附近的人在看
推荐阅读
拓展阅读
相关阅读
网友关注
最新办公软件学习
热门办公软件学习
软件教程子分类