是否有可能在Excel格式有一个“重置表单”button？

有没有办法在Excel电子表格表单中创build一个重置button？ 这是我想要清楚所有input的数据，而不是任何公式。

编辑：进一步的解释：真的，它只是一个电子表格。 当我们每天早上数钱的时候，我们有一个表格，在这里我们写下每一个不同面额的金钱，然后把它们加起来（然后把这些数字加进一个计算器）。 我认为，如果我们只将总数input到电子表格中，让Excel为我们做math计算，将节省时间并减less错误。 然而，有几个人在技术上并不是很专业，所以我想确保公式不会被意外删除。

Answer 1

没有通用的“重置button”，所以你必须自己创build一个。

在工作表中添加一个button，然后在工作表模块中编辑其代码：

Private Sub CommandButton1_Click() ClearInput End Sub 

在（普通代码）模块中，创build一个你想要的Sub：

 Sub ClearInput() Dim rngInput As Range Set rngInput = Sheet1.Range("B1:C4") ' Or wherever the user input goes rngInput.ClearContents End Sub 

一个更灵活的解决scheme是在你的工作表中有一个命名的范围（称为“UserInput”），涵盖所有将在稍后需要清除的单元格。 然后你可以使用Set rngInput = Sheet1.Range("UserInput")replace上面代码中的Set语句。

Answer 2

在您的评论之后“然而，有些人在技术上并不是很专业，所以我想确保公式不会被意外删除。” （你可能想要迁移到这个问题）：

如果你想要的是确保用户不会意外地input其他单元格中的数据而不是他们需要的数据，那么你需要保护工作表，并解除对input单元格的保护（默认情况下单元格被移出）。 保护工作表时，允许“select解锁的单元格”，但禁用“selectlocking的单元格”。 如果你只是想打击事故，而不是完全恶意，我可能不需要密码，但这也是一个选项。

这样做的一个额外的好处是只有input单元格是可选的，只要在它们之间selectinput数据，无论他们在哪里。

Answer 3

你可以使用VBA来做到这一点。 没有看到你的电子表格我不能给你任何细节，但你可以做到这一点，将A列1-15行中的所有单元格设置为空string。

 ActiveSheet.Range("A1", "A15").Value = ""