打开XLSM文件时禁用Windows Media Player视频自动播放

我试图在我的XLSM文件中嵌入mp4视频，并将任务分配给某些按钮以在需要时播放文件。打开XLSM文件时禁用Windows Media Player视频自动播放

Private Sub CommandButton2_Click() 
WindowsMediaPlayer1.URL = ThisWorkbook.Path & "\video\" & "video1.mp4" 
Application.Wait (Now + TimeValue("0:00:02")) 
WindowsMediaPlayer1.Controls.Play 
End Sub

如何在打开XLSM文件时停止自动播放媒体文件？

来源

2016-06-12 Abdelhafid Madoui

我需要上面的代码播放视频，以防单击按钮后需要它，但打开XLSM文件时自动播放文件 –

媒体播放器对象具有autostart属性作为其settings属性的一部分。您可以在启动时将此属性设置为false。在工作簿模块中输入代码：

Private Sub Workbook_Open() 
    Sheet1.WindowsMediaPlayer1.settings.autoStart = False 
End Sub

（如果需要，调整工作表参考）。

来源

2016-06-12 12:23:50

将此属性添加到工作簿模块，但我已经看到URL属性isn没有空，它包含了视频文件的路径，所以我已经将此添加到您的解决方案** Sheet1.WindowsMediaPlayer1.URL =“”**并且它被接受为解决方案。 –

打开XLSM文件时禁用Windows Media Player视频自动播放

回答

相关问题