Office中国论坛/Access中国论坛

标题: [求助]关于锁定 [打印本页]

作者: zhuangyumei 时间: 2005-4-26 16:41
标题: [求助]关于锁定
老鬼大哥，还有一个问题，关于锁定某一列单元格的问题。加了此代码后，也可以锁定某一列的单元格，但是如果我将EXCEL关了，再重新开的话，这个锁就会被自动解除。请看一下我的代码：

If ((2 = Target.Column Or 3 = Target.Column Or 4 = Target.Column Or 5 = Target.Column Or 6 = Target.Column Or 7 = Target.Column) And m_iCurrRowIndex < m_iRowMark) Then
Sheet1.Protect
Else
Sheet1.Unprotect
End If

请帮我看一下，要加一个什么代码，可以关闭EXCEL之后，打开还是锁定的？谢谢！

作者: shxxfgqj 时间: 2005-5-31 18:10
把它设为加载宏,这样每次启动EXCEL这个宏可自动运行.办法:工具—加载宏—浏览—选择指定宏—确定

作者: 红池坝 时间: 2005-6-6 04:32
偶有两种猜测：1、你的代码不晓得放在什么地方，可能是在关闭之前执行了你的Else语句2、锁定工作表前要先置相应单元格的“锁定”属性为True。 Range("b:b").Locked = True Sheet1.Protect

欢迎光临 Office中国论坛/Access中国论坛 (http://www.office-cn.net/)