Как воспроизвести видеофайл прямо с листа Excel?
Пробовали ли вы когда-нибудь воспроизводить видеофайл прямо с листа Excel? В этой статье я расскажу о нескольких интересных способах воспроизведения видеофайла, хранящегося на вашем компьютере, прямо из рабочей книги Excel.
Воспроизведение видеофайла с листа путём настройки свойств проигрывателя Windows Media Player
Воспроизведение видеофайла с листа по нажатию кнопки команды
Воспроизведение видеофайла с листа путём настройки свойств проигрывателя Windows Media Player
В Excel есть удобный элемент управления — проигрыватель Windows Media Player, который позволяет воспроизводить видеофайлы. Выполните следующие действия:
1. Щёлкните Разработчик > Вставить > Другие элементы управления, см. снимок экрана:
2. В диалоговом окне Другие элементы управления прокрутите список и выберите параметр проигрыватель Windows Media Player, затем нажмите кнопку OK, чтобы закрыть диалоговое окно, после чего перетащите мышь, чтобы нарисовать объект проигрывателя Windows Media Play. См. снимок экрана:
3. Затем откройте диалоговое окно Свойства, щёлкнув Разработчик > Свойства. В диалоговом окне Свойства выполните следующие действия:
(1.) На вкладке По алфавитуустановите значение Пожалуйста, выберите True в поле fullScreen;
(2.) Скопируйте и вставьте путь к вашему видеофайлу (включая расширение) в поле URL.
4. После завершения указанных выше настроек выйдите из режима конструктора, и ваше видео начнёт воспроизводиться.
Воспроизведение видеофайла с листа по нажатию кнопки команды
Если вы хотите воспроизводить видеофайл с помощью кнопки команды, при её нажатии откроется окно выбора файла, где можно указать нужный видеофайл для воспроизведения. Следующие шаги помогут вам:
1. Согласно шагам 1–2 из метода 1 вставьте элемент управления проигрывателем Windows Media Player, а затем последовательно выберите Разработчик > Вставить > Кнопка команды, чтобы добавить кнопку команды (см. снимок экрана):
2. Затем щёлкните правой кнопкой мыши кнопку команды и выберите пункт Свойства в контекстном меню. В появившемся диалоговом окне Свойства введите текст Воспроизвести видео рядом с полем Надпись на вкладке По алфавиту, см. снимок экрана:
3. Закройте диалоговое окно Свойства, дважды щёлкните кнопку команды и скопируйте приведённый ниже код VBA, заменив им исходный код в окне Microsoft Visual Basic для приложений.
Код 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. Затем сохраните и закройте окно кода, а также выйдите из режима конструктора. Теперь при нажатии кнопки команды появится окно выбора файла, предлагающее указать видеофайл для воспроизведения. Нажмите кнопку Открыть, и выбранный видеофайл немедленно начнёт воспроизводиться. См. снимок экрана:
См. также:
Как вставить или внедрить видео с YouTube на лист Excel?
Лучшие инструменты повышения продуктивности в Office
Раскройте весь потенциал Excel с помощью Kutools для Excel и ощутите эффективность как никогда раньше.Kutools для Excel предлагает более 300 расширенных функций для повышения продуктивности и Экономия времени.Нажмите здесь, чтобы получить нужную Вам функцию…
Office Tab добавляет в Office вкладки и значительно упрощает Вашу работу
- Включите редактирование и чтение во вкладках в Word, Excel, PowerPoint, Publisher, Access, Visio и Project.
- Открывайте и создавайте несколько документов во вкладках одного окна — вместо того чтобы использовать отдельные окна.
- Повышает вашу продуктивность на 50 % и экономит сотни кликов мышью каждый день!
Все надстройки Kutools — один установщик
Kutools for Office — набор надстроек для Excel, Word, Outlook и PowerPoint, а также Office Tab Pro, идеально подходящий командам, работающим с разными приложениями Office.
- Единый комплект— надстройки для Excel, Word, Outlook и PowerPoint + Office Tab Pro
- Один установщик, одна лицензия— настройка занимает считанные минуты (готово для MSI)
- Лучше работать вместе— оптимизированная продуктивность во всех приложениях Office
- 30-дневная полнофункциональная пробная версия— без регистрации и кредитной карты
- Лучшее соотношение цены и качества— экономия по сравнению с покупкой отдельных надстроек