怎样用VBA来保护EXCEL中包含公式的单元格

我们有时需要对某些数据进行统计阐发 , 这时就需要用到EXCEL函数 , 为了避免别人利用时删失落了公式 , 要对包含公式的单位格进行庇护 , 那怎么经由过程VBA进行主动选择包含公式的单位格进行庇护呢?小编和大师分享一下 。

怎样用VBA来保护EXCEL中包含公式的单元格

文章插图

需要这些哦
EXCEL2003
方式/
1先打开EXCEL2003 , 点击视图——东西栏——勾选 控件东西箱——选择号令按钮 , 在EXCEL页面画一下号令按钮 , 默认定名是.CommoButton1 。

怎样用VBA来保护EXCEL中包含公式的单元格

文章插图

2第二步 , 改变号令按钮的属性:右击号令按钮选择属性——在caption中从头定名为:公式庇护——然后在font属性那边设置好字体 , 完当作后点击确定 。

怎样用VBA来保护EXCEL中包含公式的单元格

文章插图

3【怎样用VBA来保护EXCEL中包含公式的单元格】第三步 , 右击号令按钮——查看代码——然后输入如下图中的代码 , 代码中起首要解除暗码庇护 , 然后再选择所有的含有公式的单位格 , 如Selection.SpecialCells(xlCellTypeFormulas, 23).Select , 然后再锁定埋没并加暗码庇护 。

怎样用VBA来保护EXCEL中包含公式的单元格

文章插图

4第四步 , 运行代码:起首要退出设计模式 , 按照
1的方式调出控件东西箱 , 然后点击左上角的退出设计模式(若是不是选择状况就是退出状况) , 然后就可以直接点击号令按钮进行主动庇护包含公式的单位格了 。

怎样用VBA来保护EXCEL中包含公式的单元格

文章插图

5第五步 , 若是要点窜庇护工作表名或者点窜暗码 , 也是右击号令按钮——查看代码 , 把本来设置的暗码改当作新的暗码就可以了 。 也可以点击东西——宏——Visual Basic 编纂器 , 然后再到号令按钮的代码去点窜就可以了 。

怎样用VBA来保护EXCEL中包含公式的单元格

文章插图

6第六步 , 为了防止别人知道暗码点窜了暗码 , 最好给VBA编纂器也加上一锁 。 同时按ALT+F11,打开VBA编纂器——点击东西——VBAProject属性——庇护——勾选:查看时锁定工程——输入两次暗码确定 。 保留退出就可以了 。

怎样用VBA来保护EXCEL中包含公式的单元格

文章插图

注重事项但愿能帮忙到你

以上内容就是怎样用VBA来保护EXCEL中包含公式的单元格的内容啦 , 希望对你有所帮助哦!

    推荐阅读