在Excel 2016中覆盖表格数据时清除其他行

我每天都要覆盖表中的数据。行数每天都在波动，因此我必须滚动到表的底部，检查行数是否少于覆盖的数据。如果有，我必须突出显示额外的“旧”数据行并删除它们。我正在尝试将此过程自动化，以a）在覆盖表数据时自动删除旧行，或b）创建某种“警报”，表示需要删除旧行。提前谢谢。

对于任何感兴趣的人，我创建了一个宏和按钮来删除6个表中的所有行。下面是从一个表中删除所有行的代码示例。我将这6个表中的每个表的with/end with语句复制并粘贴到一个宏中

With Sheet1.ListObjects("Table3")
    If Not .DataBodyRange Is Nothing Then
        .DataBodyRange.ClearContents
        .DataBodyRange.Delete
    End If
End With

---

在覆盖数据之前清除表。^^^使用.CurrentRegionI我对6个表执行此功能，并且必须向下滚动并可能删除每个表的行，这非常耗时。如果我能自动清除行，我就不必把手从键盘上移开来覆盖所有6个表。当你每天都这样做的时候，额外的几分钟节省下来的时间确实会累积起来，我预计通过自动化，我每月可以节省大约一个小时。我会调查一下。currentregion，谢谢。