·
1 months ago
The code does not do anything when I tried it. Does this work on MS Office Professional 2010?
Thanks.
在某些情况下,您可能需要根据另一个单元格中的值来锁定或解锁单元格。 例如,如果单元格A1包含值“ Accepting”,则需要将范围B4:B1解锁。 并在单元格A1包含“拒绝”值时被锁定。 您如何才能做到这一点? 本文可以为您提供帮助。
下面的VBA代码可以帮助您根据Excel中另一个单元格中的值锁定或解锁单元格。
1.右键单击工作表选项卡(带有您需要根据另一个单元格中的值锁定或解锁单元格的工作表),然后单击 查看代码 从右键单击菜单中。
2.然后将以下VBA代码复制并粘贴到“代码”窗口中。
VBA代码:根据另一个单元格中的值锁定或解锁单元格
Private Sub Worksheet_Change(ByVal Target As Range) If Range("A1") = "Accepting" Then Range("B1:B4").Locked = False ElseIf Range("A1") = "Refusing" Then Range("B1:B4").Locked = True End If End Sub
3。 按 其他 + Q 同时关闭按键 Microsoft Visual Basic应用程序 窗口。
从现在开始,当您在单元格A1中输入值“ Accepting”时,范围B1:B4将被解锁。
在单元格A1中输入值“拒绝”时,指定范围B1:B4将自动锁定。