如何在 Excel 中当单元格公式结果发生变化时自动运行宏?

我们需要通过转到"开发人员"菜单并选择"运行宏"或使用我们创建的快捷方式来运行宏。但是，您是否尝试过根据单元格值运行宏?这可以通过使用 VBA 应用程序来实现。在此过程中，当指定范围的值发生变化时，我们将自动运行宏。本教程将帮助您了解如何在单元格公式结果发生变化时自动运行宏。

在这里，我们将首先选择单元格范围，然后插入工作表的 VBA 代码。让我们通过一个简单的过程来了解如何在 Excel 中当单元格公式结果发生变化时自动运行宏。我们需要借助 VBA 应用程序来完成此过程，因为 Excel 默认无法执行此操作。

步骤 1

假设有一个 Excel 工作表，其中包含与下图所示类似的数据，以及一个宏。

现在右键单击工作表名称，选择"查看代码"以打开 VBA 应用程序，然后在文本框中输入程序，如下图所示。

示例

Private Sub Worksheet_Calculate()
'Update By Nirmal
   Dim Xrg As Range
   Set Xrg = Range("A2:A12")
   If Not Intersect(Xrg, Range("A2:A12")) Is Nothing Then
   Macro1
   End If
End Sub

代码中，A2:A12 是我们要计算公式的单元格区域，Macro1 是将自动运行的宏的名称。

步骤 2

然后将工作表保存为启用宏的工作簿，并按"Alt+Q"退出 VBA 应用程序，然后关闭工作表。当我们重新打开工作表并点击"启用代码"时，每次我们更改范围内的公式时，宏都会自动运行。

注意 − 仅当公式发生变化时，宏才会运行;如果任何数据发生变化，宏都不会运行。

结论

在本教程中，我们使用了一个简单的示例来演示如何在 Excel 中当单元格公式结果发生变化时自动运行宏。

相关文章

• 如何在 Excel 中复制受保护工作表的数据?
• 如何在 Excel 中将当前单元格地址复制到其他位置?
• 如何将条件格式规则复制到另一个工作表/工作簿?
• 如何在 Excel 中复制列宽?
• 如何将基于单元格值的列复制到另一个 Excel 工作表?
• 如何在 Excel 中复制带文本框的图表?
• 如何在 Excel 中复制包含特定值/文本的列?
• 如何在 Excel 中复制单元格的行高和列宽数据?
• 如何在 Excel 中复制单元格而不换行?
• 如何在 Excel 中仅复制单元格公式而不复制格式?

有用资源

• excel 参考教程 - 该教程包含有关 excel 的更多信息:https://www.cainiaomax.com/excel/