设置主页 | 收藏本站 Excel学习网-公益型的EXCEL在线学习网站,助您轻松办公!

让EXCEL文件只能在某台计算机上打开的VBA代码

2026年08月21日 23:27 发布来源:Excel学习网
    如何让某个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
    End Sub
原创文章如转载请注明:转载自Excel学习网 [ https://www.excelxxw.com/]
需要保留本文链接地址:https://www.excelxxw.com/jiqiao/2621.html
网站地图 | XML地图 | 免责声明 | 关于我们 | Excel学习网:优秀的EXCEL在线学习和资源分享网站。
版权所有: CopyRight © 2013-2026 www.excelxxw.com All Rights Reserved.
豫ICP备2024075255号 联系我们:12162961@qq.com