我有一个工作表,其中的B列说明了已发布我们产品的处置方式,请保留。.A列说明此产品已完成的操作,即已发货,并已入库等。如果B.列设置为“ Hold”,则需要锁定A.列。我对这种编码还很陌生,所以我几乎不知道从哪里开始甚至是否可能。
答案 0 :(得分:0)
将您希望将此规则应用于...的工作表下的VBE中粘贴
Option Explicit
Private Sub Worksheet_Change(ByVal Target As Range)
If Not Intersect(Target, Range("A:A")) Is Nothing Then
If Target.Count = 1 Then
If Target.Offset(, 1) = "Hold" Then
Application.EnableEvents = False
Application.Undo
MsgBox "Cell on Hold. Reverting changes", vbCritical
Application.EnableEvents = True
End If
End If
End If
End Sub