Powerpoint 在宏中更改音效音量 [英] Powerpoint change sound effect volume in macro

问题描述

有没有办法通过powerpoint中的vba/a宏改变音效对象的音量?即使静音和取消静音也足以满足我的尝试.

is there a way that i can change the volume of a sound effect object through vba/a macro in powerpoint? even mute and unmute would be sufficient for what I am trying to do.

推荐答案

一个非常丑陋的解决方法.我相信有更好的方法可以做到这一点，但这里是

a very ugly workaround. I am sure there is a better way of doing this, but here it is

Sub mute()
Dim gameSlide As Slide
Set gameSlide = ActivePresentation.Slides("Round Board")
gameSlide.Shapes("numSound 5").MediaFormat.StartPoint = gameSlide.Shapes("numSound 5").MediaFormat.Length - 1
End Sub

Sub unmute()
Dim gameSlide As Slide
Set gameSlide = ActivePresentation.Slides("Round Board")
gameSlide.Shapes("numSound 5").MediaFormat.StartPoint = 0
gameSlide.Shapes("numSound 5").MediaFormat.EndPoint = gameSlide.Shapes("numSound 5").MediaFormat.Length
End Sub

这篇关于Powerpoint 在宏中更改音效音量的文章就介绍到这了，希望我们推荐的答案对大家有所帮助，也希望大家多多支持IT屋！