我希望根据L列中的值来设置M列中的值,并将其与K列中的值进行比较。任何帮助都很好
我尝试采用Offset方法,但没有任何反应
If Intersect(Target, Columns("L")) Is Nothing Then Exit Sub
For Each cl1 In Intersect(Target, Columns("L"))
If cl1 <= cl1.Offset(0, -1).Value Then
cl1.Offset(0, 1).Value = cl1.Offset(0, -2).Value * cl1 * Sheet1.Range("M7").Value
Else
cl.Offset(0, 1).Value = "Text"
End If
Next
答案 0 :(得分:0)
这将起作用:
Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Column = 12 Then
For Each cl1 In Intersect(Target, Columns("L"))
If cl1.Value <= cl1.Offset(0, -1).Value Then
cl1.Offset(0, 1).Value = cl1.Offset(0, -2).Value * cl1.Value * Range("M7").Value
Else
cl1.Offset(0, 1).Value = "Text"
End If
Next
End If
End Sub
确保将代码粘贴到您正在处理的工作表中。