如何在PPT中批量插入音频

永远有多远

如题，现有工作需要将很多音频文件（MP3）插入不同的PPT幻灯片中，如何用VBA实现：插入->音频->PC上的音频-“选择文件”->插入. 这一个过程。百度和帮助文件看了很多，依然没有头绪，唯一查到靠边的代码如下所示，但是无法运行，也没有“喇叭”图标，请高手指点一下。
With ActivePresentation.Slides(1).Shapes(1).AnimationSettings
.Animate = True
.TextLevelEffect = ppAnimateByAllLevels
.SoundEffect.ImportFromFile "c:bass.wav"
End With

fatworm

顶一下,期待高手给些线索.

82suiyuan

你这个不是插入的音频，而是给动画添加的声音效果