excel清除依赖下拉列表vba

Question

毕竟，我已经有了下拉列表、依赖项等，并且运行良好，而且我还有一个 vba 代码，当用户从下拉列表父项更改一个值时，依赖项会清除其内容。但是

这只适用于该单元格...

Private Sub Worksheet_Change(ByVal Target As Range)

If Target.Cells.Count > 1 Then Exit Sub

If Not Intersect(Target, Range("C2")) Is Nothing Then
    Range("D2").ClearContents
End If
End Sub

显然是因为我告诉vba只有C2和D2，但我想要的是有人能帮助弄清楚如何使其成为整个列，而不仅仅是特定的单元格，例如 (column - 1 ) 或某事...因为如果我复制粘贴这些下拉列表仅适用于指定的第一个原因...

有人吗？有任何想法吗？请。

这里有一些图片

在上面的图片中，下拉列表仅在该特定单元格中工作，我尝试了 Hol 告诉我的功能 Cells(row index,columnIndex)，但我需要一个 for 或类似的东西，不是吗？这是我在 vba 中做的第一件事，所以我没有任何线索，我正在寻找示例然后尝试，这需要很长时间哈哈哈， 我已经尝试过使用 "C2"、 Column(3) 和 D2 Column(4) 来代替，但条件 If Not Intersect(Target, Range(Column(3))) Is Nothing Then 中出现错误

Answer 1

据我了解，您希望宏成对工作:C 列中的任何更改(从第二行底部方向开始)都会清除同一行中 D 列中的单元格。如果是这样，下面的代码就可以解决问题。

Private Sub Worksheet_Change(ByVal Target As Range)

If Target.Cells.Count > 1 Then Exit Sub

If Target.Column = 3 Then
    Target.Offset(0, 1).ClearContents
End If
End Sub