当单元格中的值更改时隐藏空行

Question

我正在尝试使以下代码正常工作。当用户选择链接到单元格C18的不同单选按钮时，它将自动检查并隐藏范围C30到c17中的空行。这是一个开始日期，因此当用户选择不同的时间段时，我希望代码隐藏/取消隐藏空行。

这是当前代码，无法正常工作：

 Private Sub worksheet_change(ByVal Target As Range)
     If Not Intersect(Target, Range("c17")) Is Nothing Then    
         Range("C18:C30").AutoFilter 1, "<>", , , False  
     End If
 End Sub

Answer 1

使用Worksheet_SelectionChange代替Worksheet_Change

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
     If Not Intersect(Target, Range("c17")) Is Nothing Then
         Range("C18:C30").AutoFilter 1, "<>", , , False
     End If
 End Sub