·
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 for Applications 窗口。
從現在開始,當您在單元格A1中輸入值“ Accepting”時,範圍B1:B4將被解鎖。
在單元格A1中輸入值“拒絕”時,指定範圍B1:B4將自動鎖定。