Excel单元格改变时发出声音

1、打开Excel工作表，点击【开发工具】、【Visual Basic】调出VBE编辑器。

2、双击【ThisWorkbook】，再输入以下VBA程序代码：

Private Sub Workbook_SheetChange(ByVal Sh As Object, ByVal Target As Range)

On Error Resume Next  '忽略运行过程中可能出现的错误

Beep  '发出蜂鸣声

End Sub

3、当工作薄里面的单元格有改变时，将会发出声音。

1、如果菜单栏上面看不到“开发工具”，啥办？

2、点击【文件】、【选项】。

3、点击【自定义功能区】，勾选【开发工具】即可。

4、点击【信任中心】，【信任中心设置】。

5、点击【宏设置】，选择“启用所有宏”，再依次点击右下角的【确定】。