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

时间:2023-07-02 23:03:32 

如何让某个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

标签:EXCEL,VBA代码
0
投稿

猜你喜欢

  • 强制删除文件夹的命令是什么

    2023-11-29 10:34:34
  • Win10系统中查看蓝屏记录文件的操作方法介绍

    2023-09-09 12:03:22
  • EQ直播室怎么用?EQ直播室使用方法

    2022-06-06 11:49:02
  • excel表格取消加密的教程

    2022-07-21 07:29:19
  • Win10无法登录微软账户 Win10登录微软账户出错怎么办?

    2023-12-13 19:12:47
  • windows7系统安装过程中提示0x800f0a12错误的解决方法

    2022-04-20 09:36:00
  • 如何在PPT中插入剪贴画

    2023-11-12 22:35:06
  • 如何从YouTube视频制作GIF?

    2022-05-28 13:18:30
  • Win10怎么取消任务视图功能?Win10任务视图关闭教程

    2022-06-11 05:44:02
  • 特俗的字 特殊符号打法

    2023-02-24 02:19:51
  • 怎么清除win10电脑剪切板数据

    2022-10-24 21:27:10
  • Win10系统下“自动检测设置”总是会自动勾选怎么办?

    2023-12-07 12:36:06
  • 公式中的小逗号,一不留神就出错

    2022-03-23 05:43:44
  • 问题来了:斯巴达浏览器如何禁用Flash

    2023-12-25 02:38:31
  • 鲁大师跑分排行榜最新汇总 鲁大师2021年4月最新显卡性能排行榜

    2023-06-11 00:14:45
  • QQ空间自定义导航的方法

    2022-03-17 08:45:31
  • XP系统键盘驱动的修复方法

    2023-06-22 02:24:03
  • text函数使用方法,五个例子教会你

    2022-12-12 18:32:19
  • Word空白处不显示下划线怎么办?

    2023-08-16 15:09:21
  • win7电脑如何添加本地连接

    2023-01-06 04:28:49
  • asp之家 电脑教程 m.aspxhome.com