如何用VBA代码设置共享工作簿权限?在excel中可以用VBA代码设置共享工作簿权限,但是很多用户不知道如何设置,下面就是用VBA代码设置共享工作簿权限的方法,一起了解一下。
1、将excel打开,将共享工作薄的框架和主要内容编辑好,要清楚的知道共享后每个人的分工。
2、在上方工具栏中选择【视图】中的【工具栏】,勾选【工具栏】中的【控件工具箱】,会弹出一个控件工具箱的弹窗。
3、点击控件工具箱中的【命令】按钮,然后在表格的空白处画一个框,就会弹出一个命令按钮,右键单击【命令】按钮,选择【属性】,将【caption属性】更改为【共享工作簿】。(如下图)
4、现在我们来设置代码。右键单击共享工作簿的【命令】以查看代码,之后在代码编辑区中输入以下的内容,输入完成后保存退出。
Application.DisplayAlerts = False
ThisWorkbook.SaveAs , , , , , , xlShared
Application.DisplayAlerts = True
5、回到共享工作簿命令窗口,点击取消【设计模式】,然后点击【命令】,就可以运行代码了。可以发现这个时候VBA编辑器就会被锁定无法进去。
6、设计取消共享代码:按照以上方法再插入一个命令按钮并命名为:取消共享,然后在代码区那里输入如下代码并保存退出:6、我们还可以设计取消共享代码。按照上面的方法,我们再插入一个【命令】并将其命名为【取消共享】。输入如下代码并保存退出。
Application.DisplayAlerts = False
ThisWorkbook.ExclusiveAccess
Application.DisplayAlerts = True
上面就是用VBA代码设置共享工作簿权限的方法,大家学会了吗?请继续关注
系统之家。
发表评论
共0条
评论就这些咯,让大家也知道你的独特见解
立即评论以上留言仅代表用户个人观点,不代表系统之家立场