Excel'de çalışırken Excel'de film izleyin veya dinleyin:
1. Ana menüde Ekle->Nesne'yi tıklayın.
2. Seç Windows Medya Oynatıcı itibaren Nesne türü kutu ve Tamam'a basın
3. WMP'yi istediğiniz gibi taşıyın ve yeniden boyutlandırın
Not: WMP nesnesini yeniden boyutlandıramazsanız, tasarım modu düğmesine tıklayarak “Tasarım Modu”na geçin.
Şimdi Windows Media Player nesnesine Oynat ve hangi dosyanın oynatılacağını söylemek için bazı kodlar ekleyeceğiz. Visual Basic Düzenleyicisini (alt+F11) açın, az önce eklediğiniz WMP'yi içeren çalışma sayfasına çift tıklayın ve aşağıdaki kodu yapıştırın:
12345678910 | Alt PlayMovie()'URL, filmin konumudur - uygun şekilde değiştirinWindowsMediaPlayer1.URL = "C:/rb.wmv"WindowsMediaPlayer1.Controls.PlayAlt Bitiş |
Filmi tıpkı bir Makro çalıştırır gibi oynatın: Araçlar->Makro->Makrolar
Patron yaklaşırsa Filmi oynatmayı Gizle ve Durdur için birkaç kısayol da oluşturmak isteyebilirsiniz. Aşağıdaki kodu önceki kodun altına ekleyin:
123456789101112131415161718 | Alt HideQuick()WindowsMediaPlayer1.Visible = YanlışWindowsMediaPlayer1.Controls.pauseAlt BitişAlt ShowQuick()WindowsMediaPlayer1.Visible = DoğruWindowsMediaPlayer1.Controls.PlayAlt Bitiş |
Ardından, 2 makroya kısayollar ekleyin (Araçlar->Makro->Makrolar->Seçenekler) ve parmaklarınızın ucunda anında bir AÇMA/KAPAMA anahtarınız olur.
Kenar notu: Doğrudan Excel'de film izlemek ilginç olsa da, çalışırken film izlemenin en sevdiğim yolu, birkaç farklı seçenek ayarlı bağımsız Media Player'ı kullanmaktır.
Araçlar->Seçenekler menüsünden “Cilt Modundayken Üstte Görüntüle” kutusunu işaretleyin. Görünüm menüsünden “Dış Görünüm Modu”nu seçin (küçük bir dış görünüm en iyi sonucu verir). Filminizi ekranınızın sağ altına veya soluna taşıyın.
Bu kurulumla çalışabilir ve ayrıca uygulamalar arasında geçiş yapabilirim ve filmimi her zaman görünür, ancak aradan çekebilirim. Kingzter'e teşekkürler.