如果在Excel中满足条件，如何播放声音？

如果在Excel中满足条件，如何播放声音？

在Excel中，我们可以应用条件格式来格式化和突出显示需要满足条件的单元格，但是有时，如果满足条件，则可能需要播放声音。 例如，如果A1中的单元格值大于300，则我想播放声音。 Excel不支持此功能，本文中，我将介绍一些VBA代码来解决此任务。

使用VBA代码根据单元格值播放默认的系统提示音

使用VBA代码根据单元格值播放自定义声音

如果单元格值通过VBA代码在特定列中发生更改，请播放声音

这是一个方便的代码，供您在满足特定条件时播放默认的系统提示音，请按照以下步骤操作：

1. 按住 ALT + F11 键，然后打开 Microsoft Visual Basic应用程序 窗口。

2。 点击 插页 > 模块，然后将以下代码粘贴到 模块 窗口。

VBA代码：根据单元格值播放默认的系统提示音：

3。 然后保存并关闭此代码窗口，返回到工作表，然后输入以下公式： = IF（A1> 300，BeepMe（），“”） 单元格旁边的空白单元格中包含您要基于其播放声音的值，然后按 输入 键，公式单元格中将不显示任何内容，请参见屏幕截图：

4。 现在，如果在单元格A1中输入的值大于300，将播放默认的系统提示音。

如果您想播放默认系统提示音以外的其他声音，这里的VBA代码也可以帮您一个忙。

1。 按住 ALT + F11 键，然后打开 Microsoft Visual Basic应用程序 窗口。

2. 点击 插页 > 模块，然后将以下代码粘贴到 模块 窗口。

VBA代码：根据单元格值播放特定的声音：

3。 然后保存并关闭此代码窗口，返回到工作表，并输入以下公式： = IF（A1> 300，SoundMe（），“”）单元格旁边的空白单元格中包含您要基于其播放声音的值，然后按 输入 键，公式单元格中将不显示任何内容，请参见屏幕截图：

4。 从现在开始，如果将大于300的值输入到单元格A1中，则将立即播放特定的声音。

：在上面的代码中，您可以根据需要将声音wav文件更改为 c：\ windows \ media \ 文件路径。 看截图：

如果要在特定列中更改单元格值时播放声音，则可以应用以下VBA代码。

1。 右键单击要在列中的值更改时播放声音的工作表标签，然后选择 查看代码 从上下文菜单中，然后在打开的 适用于应用程序的Microsoft Visual Basic 窗口，将以下代码复制并粘贴到空白模块中：

VBA代码：如果单元格值在列中更改，请播放声音：

备注：在上面的代码中，数字 3 在脚本中 专栏（3） 是当此列中的值更改时要播放声音的列号。

2。 然后保存并关闭此代码窗口，现在，如果第三列中的单元格值发生更改，则将播放默认的系统提示音。