如何从Excel工作表播放视频文件？

您是否尝试过从工作表中播放视频文件？在本文中，我将为您介绍一些有趣的技巧，让您能够从Excel工作簿中播放存储在计算机中的视频文件。

通过设置Windows Media Player的属性从工作表播放视频文件

通过点击命令按钮从工作表播放视频文件

通过设置Windows Media Player的属性从工作表播放视频文件

在Excel中，有一个非常有用的控件——Windows Media Play可以帮助您播放视频文件，请按照以下步骤操作：

1. 点击 开发工具 > 插入 > 其他控件，参见截图：

2. 在“其他控件”对话框中，滚动并选择 Windows Media Player 选项，然后点击 确定 按钮关闭对话框，接着拖动鼠标绘制一个 Windows Media Play 对象，参见截图：

3. 接着通过点击 开发工具 > 属性 进入 属性 对话框，在 属性 对话框中，请执行以下操作：

(1.) 在 字母顺序 标签下，请从 fullScreen 字段中选择 能 选项；

(2.) 复制并粘贴您的视频 文件路径（包括文件扩展名）到 URL 字段中。

4. 完成上述设置后，请退出 设计模式，现在，您指定的视频正在播放了。

通过点击命令按钮从工作表播放视频文件

如果您想通过命令按钮播放视频文件，当您点击该命令按钮时，会弹出一个浏览窗口，供您选择要播放的视频文件。以下步骤可能会对您有所帮助：

1. 根据方法1中的步骤1-2插入 Windows Media Player 控件，然后继续点击 开发工具 > 插入 > 命令按钮 来插入一个 命令按钮，参见截图：

2. 然后右键单击 命令按钮，并从上下文菜单中选择 属性，在弹出的 属性 对话框中，在 字母顺序 标签下的 Caption 字段旁边输入文本 播放视频，参见截图：

3. 然后关闭 属性 对话框，再双击 命令按钮，接着复制并粘贴以下VBA代码以替换原始代码到 Microsoft Visual Basic for Applications 窗口中。

VBA代码：从工作表播放视频文件：

Private Sub CommandButton1_Click()
    Dim FName As Variant
    FName = Application.GetOpenFilename(FileFilter:="Video Files, *.mp4; *.avi; *.mpeg; *.mts", Title:="Please select a Video File", MultiSelect:=False)
    If FName <> False Then
        WindowsMediaPlayer1.Url = FName
    End If
End Sub

注意：在上面的代码中，CommandButton1 是您插入的命令按钮名称，而 WindowsMediaPlayer1 是您插入的 Windows Media Player 名称。您可以根据需要添加其他视频文件扩展名到 *.mp4; *.avi; *.mpeg; *.mts 脚本中。

4. 然后保存并关闭代码窗口，并退出 设计模式，现在，当您点击 命令按钮 时，会出现一个浏览窗口，提示您选择要播放的视频文件，然后点击 打开 按钮，特定的视频文件将会立即播放。参见截图：

相关文章：

如何在Excel工作表中插入或嵌入YouTube视频？