怎样使用VBA播放背景音乐

1、首先在开发工具中打开VBA编辑器

2、在单元格区域当中输入一些内容作为例子

3、在VBA编辑器中插入模块

4、在模块当中输入如下代码，然后运行Declare Function mciExecute Lib "winmm.dll" (ByVal lpstrCommand As String) As LongSub auto_open() ReturnSoundValue=mciExecute("open " & ThisWorkbook.Path & "\上海滩.mid ALIAS rsv") mciExecute "play rsv"End SubSub关闭() mciExecute "close rsv"End Sub

5、重启工作簿，2秒钟后就可以听到音乐已在播放