如何让EXCEL文件只能在某台计算机上打开的VBA代码
发布时间：2023-07-02 23:03:32
标签：EXCEL,VBA代码
如何让某个EXCEL文件，限制在某台电脑上打开，而其它电脑不能打开该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
0
投稿猜你喜欢
据CNBC北京时间7月21日报道，网络罪犯周三盗走了超过15万枚以太币，价值约3000万美元（约合人民币2.03亿元）。据以太坊初创公司Et- 在使用excel的时候会需要用到设置显示公式的技巧，设置显示公式技巧可以让公式进行显示让用户进行检查，如果不懂得如何使用设置显示公式技巧的朋
- 360随身WiFi怎么用和360随身WiFi如何使用这两个问题经常有用户询问，并且很多用户自己操作过后发觉还是无法使用，那么今天在这边就教给
- Twenty5 Titles A-F部分合集推荐给需要做视频后期特效的朋友，每个部分包含25个fcpx现代时尚流行文字标题字幕条动画插件，可
- 安装笔记本专用win7系统时出现ABORT：10100，Invalid switch或者usage error 10100 Invalid
- win7如何升win10正式版?Win7用户有必要升级Win10吗?人们也很容易看出，对于绝大多数桌面PC用户来说，Windows 10的表
- 具体操作如下： 利用下图1处的拉杆，可以把PPT页面调的很小，主要是为了设置一些动画效果比较方便。 有时候呢，又需要吧页面的局部放
- 陌鱼直播注册不了怎么办？陌鱼直播是一款非常不错的直播软件，有些用户想要在陌鱼直播中注册账号，但是一直注册不了，那么我们该怎么解决这个问题呢？
- 最近有Win8.1用户反馈，他在给Win8.1系统中的某个卷集中备份镜像时出现了故障，提示错误代码为0x807800c5，导致用户无法备份W
- 福昕阅读器是目前使用最为广泛的一款PDF阅读器，当我们使用福昕阅读器时想要为pdf添加书签应该怎么办呢？我相信以下教程一定对大家有所帮助，下
- 为了防止不小心关机或者我们在玩游戏的时候，怕身边小伙伴恶作剧突然按电脑的关机键，所以我们想要禁用关机键，那么该怎么让电脑关机键失效呢？下面我
- Mockplus的设计理念就是使原型设计更快、更简单。那么如何来实现呢？就让我们通过页链接、组件间交互和交互状态的三种交互设置方法，来体验一
- ppt怎么设计吊牌样式的图标？ppt中想要设计一个调漂图标，该怎么绘制吊牌图形呢？下面我们就来看看详细的教程，需要的朋友可以参考下ppt中绘
- 有些小伙伴为了延长自己电脑上物理光驱的使用寿命，特意安装了虚拟光驱，结果发现由于操作不当，导致安装完虚拟光驱以后物理光驱反而无法使用了，不知
- 今天小编为大家带来了Win10 Mobile/PC一周年更新快速版14393.5更新内容汇总，感兴趣的朋友可以一起看看 7月26日
- excel中怎么筛选求和呢？下面小编来教大家。01、首先，我们打开一个excel文档，然后我们选中图示中的区域，之后点击数据，然后点击筛选；
- 怎么在wps表格中添加属于自己的水印呢?下面小编就为你介绍wps表格如何加水印的方法啦!wps表格加水印的方法：打开或新建一工作表，如下图所
- 微软已经向内部测试者和合作伙伴提供了Windows 10 build 9888进行测试。win10预览版build 9888开始试图统一菜单
- 【Word常用快捷键，一次性解决Word排版问题】今天计算机一级成绩、计算机二级成绩公布，你考得怎么样？9图教你快速解决排版问题转存！ （人
- word2007稿纸加载项不显示怎么办？在设置稿纸的是偶发现，稿纸设置不显示，加载不出来，这是怎么回事？下面分享两种解决办法，需要的朋友可以
