我试图找到一种方法来改变我当前单元格上方2列的值,如果我的单元格在第三列上的值是"支付"例如
答案 0 :(得分:0)
使用下面的公式,即2个列单元格高于当前单元格,似乎当前单元格地址为:A5
If(A5="payoff","return true condition", "return if false")
通过公式扩展,A5
是相关的并自动更改。
或者使用bellow宏,在相关工作表模块中写入,如果您的操作系统是Windows,则使用Alt+F11
。
在下面假设您的工作表名称为Sheet1
您需要的列索引是1
和2
(使用列索引)
Private Sub Worksheet_Change(ByVal Target As Range)
If ActiveSheet.Name = "Sheet1" Then
If (Target.Column = 1 Or Target.Column = 2) And Target.Value = "payoff" Then
Cells(Target.Row - 1, Target.Column).Value = "Destination value1 if condition"
Cells(Target.Row - 2, Target.Column).Value = "Destination value2 if condition"
End If
End If
End Sub