EXECEL报警提示可以有声音提示

更新时间2019-04-11 12:31:08

我用扫描枪扫出范围中的数值（A列做了数据有效性），如果超出范围报警是时候有声音提示，我需要怎么做啊？请帮帮忙！！！

这个可以通过VBA实现：

假设数据所在的表单为"Sheet1"，如果A列的录入数据在1000-10000为正常，超出为异常

菜单：工具-》宏-》Visual basic编辑器

在弹出的VBA页面的左框中，鼠标双击对象Sheet1，在弹出的右框内编辑好以下代码：

Private Sub Worksheet_Change(ByVal Target As Range)
 If Target.Column = 1 Then
   If Val(Target.Value) < 1000 Or Val(Target.Value) > 10000 Then Beep
 End If
End Sub

回到excel页面，在Sheet1的A列内输入数据，当数据小于1000或大于10000时即会声音报警。

注意：公式中的1000,10000位数据的控制值，可据实更改；

         第1个IF中的1是指第1列，可据实更改；

         电脑的声音需按需要调大一点；

相关标签:声音