excel - 清除单元格值时如何触发代码？

Question

我正在运行一个 Worksheet_Change 子程序，它检查更改的单元格是否在特定列中，然后自动调整该列。

Public Const startCol = 7 '(declared in a separate module)

Private Sub Worksheet_Change(ByVal Target As Range)
    If Target.Column = startCol Then
        Target.Columns.AutoFit
    End If
End Sub

我的问题是，此宏仅在单元格中放入某些内容或单元格的值更改时运行，而不是在单元格的值被清除或单元格被完全删除时运行。

Answer 1

试试这个代码:

Private Sub Worksheet_Change(ByVal Target As Range)
    If Target.Column = startCol Then
        Columns(startCol).AutoFit
    End If
End Sub