禁止修改工作薄所有工作表单元格数据VBA源代码

时间:2024-10-12 10:23:51

1、俺也是受了一肚子窝囊气,觉得以上的方法不尽己愿,故而花了一下午时间,决心自己学习VBA,自己编写代码来解决自己的实际问题!小有所成,拿出来与大家分享先!   如下图,为第一种代码!此代码放在“ThisWorkbook“模块里面!

禁止修改工作薄所有工作表单元格数据VBA源代码

2、上述代码实现的功能是:无论您当前的工作薄有多少个工作表,无论您的工作表中有多少条数据,任何一个单元格的数据都无法修改!在不能修改数据的前提下,不弹出任何提示信息,仅将修改后的数据恢复到原来没有修改的状态,实现禁止修改的目的!   在上图代码的基础上,加以分析再琢磨,就得出了如下图的代码了!此代码放在“ThisWorkbook“模块里面!

禁止修改工作薄所有工作表单元格数据VBA源代码

3、上述代码实现的功能是:无论您当前的工作薄有多少个工作表,无论您的工作表中有多少条数据,如果要修改被限制的列的数据,则需要输入密码,密码正确则可以修改,密码错误则无法修改!在不能修改数据的前提下,不弹出任何提示信息,仅将修改后的数据恢复到原来没有修改的状态,实现禁止修改列数据的目的!

© 手抄报圈