Excel中与值

Question

更换式有两个列A & B：

• A具有从另一片提取值的公式。
• B是输入值。

如果B中的输入值是“Y”，那么A中的公式应该被替换为从公式中获得的静态值。如果B是空的，A保持它的公式。

我怎样才能达到这一点的所有行？

Answer 1

如果我正确理解你的问题，可以用Worksheet_Change Event完成。当单元格（Target）更改时发生此事件。

所以你只需要检查Target.Column是否是第二列，如果它的值是Y，然后将一列左移Target.Offset(0, -1)并替换该值。

Option Explicit 

Private Sub Worksheet_Change(ByVal Target As Range) 
    If Target.Column = 2 And Target.Value = "Y" Then 
     Target.Offset(0, -1).Value = Target.Offset(0, -1).Value 
    End If 
End Sub 

注意，输入值Y是大小写敏感的，只适用于大写Y。为使其不区分大小写，使用UCase(Target.Value) = "Y"代替接受小写y。