如何在 excel 中响铃-凯发k8国际真人

如何在 excel 中播放系统声音以响铃

只需几行 visual basic，您就可以让 excel 播放系统声音。然后，您可以根据单元格的值触发此声音。

要在 excel 中播放系统声音：

1. 使用键盘快捷键alt f11启动microsoft visual basic for applications 。
2. 转到插入 > 模块。
3. 输入以下代码：
```
function makeabeep() as string
    beep
    makeabeep = “”
end function
```
4. 单击保存图标。
5. 单击save as type下拉菜单并选择excel macro-enabled workbook。您的文件需要以这种格式保存才能播放声音。
6. 保存您的工作簿。
7. 单击窗口右上角的 x关闭microsoft visual basic for applications窗口。
8. 要测试您的哔声，请在任何单元格中键入以下内容：=makeabeep()
9. 按enter，您应该会听到系统声音。

如何使用 visual basic 在 excel 中播放自定义声音

如果您更喜欢选择自己的声音而不是播放默认的系统提示音，也可以让 excel 播放特定的声音文件。

在 excel 中播放自定义声音：

按alt f11启动microsoft visual basic for applications 。
单击插入 > 模块。

输入以下代码：

#if win64 then
    private declare ptrsafe function playsound lib "winmm.dll" _
        alias "playsounda" (byval lpszname as string, _
        byval hmodule as longptr, byval dwflags as long) as boolean
#else
    private declare function playsound lib "winmm.dll" _
        alias "playsounda" (byval lpszname as string, _
        byval hmodule as long, byval dwflags as long) as boolean
#end if
const snd_sync = &h0
const snd_async = &h1
const snd_filename = &h20000
function alarmsound() as string
    call playsound("c:\users\adam\downloads\alarm.wav", _
      0, snd_async or snd_filename)
    alarmsound = ""
end function

ring-alarm-excel-vba-play-sound

将“c:\users\adam\downloads\alarm.wav”替换为您要使用的声音文件的文件位置。获取完整文件路径的最简单方法是在 windows 资源管理器中导航到该文件，右键单击它，然后选择copy as path。
关闭microsoft visual basic for applications窗口。
通过在任何单元格中输入以下内容来测试您的声音：=alarmsound()
按enter，您的声音应该会播放。