VBA Excel 自动填充事件

Question

我需要能够在用户尝试自动填充列时执行一些代码，或者能够在 Worksheet_Change 执行期间检测到它是自动填充。我有一些代码可以更改自动填充单元格的值。问题是每次我一次编辑多个单元格时都会触发此代码。

Private Sub Worksheet_Change(ByVal Target As range)
    If Target.Rows.count > 1 Then

Answer 1

AFAIK 和我可能是错的，但没有简单的方法可以捕获自动填充事件。
Target.Rows.count是检查它是否是自动填充的一种不可靠的方法 Target.Rows.count在许多情况下将大于 1。例如

用户粘贴在多个单元格中

用户删除了多个单元格

用户按下 CTRL + Z(撤消)更改了多个单元格等...

如果您真的想捕获自动填充，那么您必须处理所有上述情况并消除缩小范围以确定它确实是自动填充事件的可能性。