使用VBA清空数据记录

最新推荐文章于 2026-03-14 01:08:43 发布

原创最新推荐文章于 2026-03-14 01:08:43 发布 · 3.4k 阅读

3 ·

本内容遵循CC 4.0 BY-SA版权协议

标签

#VBA

收录于

VBA for Excel 专栏收录该内容

2 篇文章

订阅专栏

这篇博客介绍了一个VBA宏代码，用于在Excel工作簿中清除所有非指定（例如非'成绩表'）工作表的数据记录。代码通过遍历工作表并检查名称，只清除非保留元数据的工作表内的A2到D65536范围的内容，从而实现数据清理。

目的：在指定条件下，将一个工作薄中的某些工作表数据记录清空

代码实现：

Sub 清除记录()
Dim sht As Worksheet
For Each sht In Worksheets
If sht.Name <> "成绩表" Then   '成绩表'中是保存元数据记录的工作表标签名称
sht.Range("A2:D65536").ClearContents   '清除各分表中的数据记录
End If
Next
End Sub