VBA怎么设置共享工作簿权限

【VBA怎么设置共享工作簿权限】今天小编和大师分享一下若何利用VBA设置EXCEL共享工作薄权限 , 今天以EXCEL2003例给大师进行讲解 。

VBA怎么设置共享工作簿权限

文章插图

需要这些哦
EXCEL2003
方式/
1起首打开EXCEL2003编纂好共享工作薄的框架和本家儿要内容 , 明白共享后大家的分工 。

VBA怎么设置共享工作簿权限

文章插图

2第二步 , 点击打开控件东西箱:点击视图——东西栏——控件东西箱 , 这时控件东西箱就会被勾选 , 并弹出控件东西箱 。

VBA怎么设置共享工作簿权限

文章插图

3第三步 , 插入号令按钮并设置属性:点击选择号令按钮——在表格空白处画一个框 , 号令按钮就出来了——右击号令按钮 , 选择属性——把caption属性改为:共享工作薄 。

VBA怎么设置共享工作簿权限

文章插图

4第四步 , 设置代码:右击共享工作薄的号令按钮——查看代码——然后在代码编纂区那边输入如下内容并保留退出:Application.DisplayAlerts = False    ThisWorkbook.SaveAs , , , , , , xlShared    Application.DisplayAlerts = True 

VBA怎么设置共享工作簿权限

文章插图

5第五步 , 运行代码:回到共享工作蒲号令按钮那边 , 点击控件箱左上角的设计模式 , 打消设计模式 , 然后点击号令按钮就可以运行代码了 , 这时VBA编纂器就会被锁定无法进去 。

VBA怎么设置共享工作簿权限

文章插图

6第六步 , 设计打消共享代码:按照以上方式再插入一个号令按钮并定名为:打消共享 , 然后在代码区那边输入如下代码并保留退出:
Application.DisplayAlerts = False    ThisWorkbook.ExclusiveAccess    Application.DisplayAlerts = True

VBA怎么设置共享工作簿权限

文章插图

注重事项但愿能帮忙到你 。

以上内容就是VBA怎么设置共享工作簿权限的内容啦 , 希望对你有所帮助哦!

    推荐阅读