根据每一行的另一个单元格清除单元格内容

时间:2019-05-30 10:07:39

标签: excel vba cell clear

如何根据其他单元格的变化但每行分别清除一个单元格? 说,我更改AI5并清除AQ5,我更改AI17并清除AQ17?

我有以下代码:

data_1

它仅适用于代码中的单元格。 如果我都将其更改为该列的范围,则会清除所有列AQ,这不是我所需要的。

谢谢

1 个答案:

答案 0 :(得分:4)

赞:

Private Sub Worksheet_Change(ByVal Target As Range)

    If Intersect(Target, Range("AI" & Target.Row)) Is Nothing Then Exit Sub
    Application.EnableEvents = False
    Range("AQ" & Target.Row).ClearContents
    Application.EnableEvents = True

End Sub

您需要告诉excel哪一行,并且该行将与Target.Row相同,以便您可以使用它。