excel vba和保护单元格冲突怎么解决

RT,因给公司新人学习和快速计算,写了个VBA程序(只用于影藏和显示对应的行,其他的还是用的excel的函数公式),因公式等需要隐藏和保护,用了excel的保护工作表,但是就和VBG冲突了,后来百度了下加了一段 开关保护工作表,具体代码可以看下面的两张图片。现在的问题是,我运行什么的都没有问题,切换表格都正常,单元格也是保护状态下,但是,在给其输入内容的单元格,只要我双击或者我输入个值,所有的保护就会去掉,求大神告知该怎么办?因公司内部网无法把EXCEL文件上传只能拍下代码,求大神赐教!谢谢!

你使用了change事件,该事件第一行可响应的代码为:解除工作表保护
所以,一发生change(修改内容)的事件,就解除了工作表保护。
IF结构中,仅当TARGET的地址为“B2”,才运行加保护的代码。
——这样的逻辑,你说是什么样的结果?

而且你那些隐藏行的代码,可以简化一下:
rows(2:11)就表示了从2到11这些行。追问

那该怎么办啊 ?求大神赐教还能救么。。。代码真心不懂,是我东拼西凑的

追答

Q15963970

温馨提示:答案为网友推荐,仅供参考
第1个回答  2015-03-03
先解保护再进行其他操作