岁末年初之时，我们需要为新一年的工作，建立大量的表格，大家经常采用的方法是，复制去年应用的工作簿，重命名后，清除旧数据！如果遇到表格中的数据比较庞大，清除旧数据也很费时费力！下面跟大家继续分享一个一劳永逸的好方法！只要用鼠标点击一下按钮，内容会瞬间根据你的需要被清空！工具/原料more电脑壹台OFFICE办公软件方法/步骤1/10分步阅读

如图所示，表中有大量的数据，要求保留公式、标题栏、“本月合计”和“本年累计”单元格，其它单元格的数据皆清空。

2/10

用鼠标点一下“清除内容”按钮，瞬间可以得到你想要的表格！下面分步骤与大家分享一下！

3/10

在工作表中，点击菜单栏【开发工具】，在其工具栏内，点击【visual basic】!

4/10

进入VBA编辑界面！点击菜单栏【插入】，在其下拉菜单中，选择【模块】！

5/10

会弹出模块编辑窗口！

6/10

在代码编辑窗口输入以下代码：

Sub 其他清除()

For Each Rng In Range(d4, Cells(Rows.Count, d).End(xlUp))

If Rng 本月合计 And Rng 本年累计 Then

Rng.Offset(0, -3).Resize(1, 6).ClearContents

Else

Range(a Rng.Row :c Rng.Row).ClearContents

End If

Next

Cells(3, g).ClearContents

End Sub

7/10

在“开发工具”菜单下，点击“插入”按钮！

8/10

在其下拉菜单中，点击插入“表单控件”，并命名为“清除内容”！

9/10

将【清除内容】按钮与编写代码程序相关联！

10/10

点击运行“清除内容”控件，便可以快速清除表格中不需要的内容！