Powerpoint更改宏中的音效音量
Powerpoint更改宏中的音效音量
提问于 2014-02-08 22:28:31
有没有办法在powerpoint中通过vba/a宏更改音效对象的音量？对于我正在尝试做的事情，即使是静音和取消静音也是足够的。
回答 2
Stack Overflow用户
发布于 2014-02-08 23:53:21
Dim oSh As Shape
Set oSh = ActiveWindow.Selection.ShapeRange(1)
With oSh.MediaFormat
.Volume = 1 ' scale is 0 to 1
.Muted = False ' | True
End WithStack Overflow用户
发布于 2014-02-11 09:39:08
一个非常丑陋的变通方法。我相信有一种更好的方法可以做到这一点，但这就是它
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页面原文内容由Stack Overflow提供。腾讯云小微IT领域专用引擎提供翻译支持
原文链接：
https://stackoverflow.com/questions/21647225
复制相关文章
相似问题
腾讯云开发者
