Гледайте или слушайте филми в Excel, докато работите в Excel:
1. В главното меню щракнете върху Вмъкване-> Обект
2. Изберете Windows Media Player от Тип обект поле и натиснете OK
3. Преместете и преоразмерете WMP по ваш вкус
Забележка: Ако не можете да промените размера на WMP обекта, превключете на „Режим на проектиране“, като щракнете върху бутона за режим на проектиране
Сега ще добавим код, за да кажем на обекта на Windows Media Player да играе и какъв файл да възпроизвежда. Отворете редактора на Visual Basic (alt+F11), щракнете двукратно върху работния лист, който съдържа WMP, който току -що сте вмъкнали, и поставете следния код:
12345678910 | Sub PlayMovie ()„URL е местоположението на филма - променете го по подходящ начинWindowsMediaPlayer1.URL = "C: /rb.wmv"WindowsMediaPlayer 1. КонтролиранеEnd Sub |
Пуснете филма точно както бихте пуснали макрос: Инструменти-> Макро-> Макроси
Може също да искате да създадете няколко преки пътища за скриване и спиране на възпроизвеждането на филма, ако шефът се приближи. Добавете следния код под предишния код:
123456789101112131415161718 | Sub HideQuick ()WindowsMediaPlayer1.Visible = FalseWindowsMediaPlayer 1.Controls.pauseEnd SubSub ShowQuick ()WindowsMediaPlayer1.Visible = ВярноWindowsMediaPlayer 1. КонтролиранеEnd Sub |
След това добавете преки пътища към 2-те макроса (Инструменти-> Макро-> Макроси-> Опции) и имате незабавен превключвател за включване/изключване на една ръка разстояние.
SideNote: Докато гледате филм директно в Excel е интересно, любимият ми начин да гледам филм по време на работа е използването на самостоятелния Media Player с няколко различни опции.
От меню Инструменти-> Опции поставете отметка в квадратчето „Показване отгоре, когато сте в режим на кожа“. От менюто Изглед изберете „Skin Mode“ (малка кожа работи най -добре). Преместете филма си в долния десен или ляв ъгъл на екрана.
С тази настройка мога да работя, а също и да превключвам между приложения и винаги филмът ми да се вижда, но все пак на пътя. Благодарение на Kingzter.