为何要动态锁定
如果童鞋你需要锁定的位置是固定的,那么你可以直接采用单元格保护的方式,手工锁定。但如果位置不固定,那么只能采取代码的方式解决,我们先来说一下手工锁定:
1、取消单元格锁定。
2、保护工作表,设置可以选定未锁定单元格。
采用Vba实现上述效果
1、实现工作表保护及解锁保护。
代码如下 | 复制代码 |
SheetObj.Protect "PassWord"'保护 SheetObj.Unprotect "PassWord"'取消保护 |
2、单元格的锁定和解锁。
代码如下 | 复制代码 |
RangeObj.Locked =true'锁定 RangeObj.Locked=False'解锁 |
3、设置未锁定单元格可选定,实现锁定效果。
代码如下 | 复制代码 |
SheetObj.EnableSelection = xlUnlockedCells |
结束语
本文说的比较简单,希望是激发童鞋们的想象力及“控制欲”,一段好的代码需要一个好的程序猿,可惜小编不是总是BUG,而且都是先量贩。
时间: 2024-10-07 11:03:29