Se eller lyt til film i Excel, mens du arbejder i Excel:
1. Klik på Indsæt-> Objekt i hovedmenuen
2. Vælg Windows Media Player fra Objekttype boks og tryk OK
3. Flyt og ændr størrelsen på WMP til din smag
Bemærk: Hvis du ikke kan ændre størrelsen på WMP -objektet, skal du skifte til "Designtilstand" ved at klikke på designtilstandsknappen
Nu tilføjer vi en kode for at fortælle Windows Media Player -objektet at afspille, og hvilken fil der skal afspilles. Åbn Visual Basic Editor (alt+F11), dobbeltklik på det regneark, der indeholder den WMP, du lige har indsat, og indsæt følgende kode:
12345678910 | Sub PlayMovie ()'URL er filmens placering - skift passendeWindowsMediaPlayer1.URL = "C: /rb.wmv"WindowsMediaPlayer1.Controls.PlayAfslut Sub |
Afspil filmen, ligesom du ville køre en makro: Værktøjer-> Makro-> Makroer
Du vil måske også oprette et par genveje til Skjul og stop afspilning af filmen, hvis chefen nærmer sig. Tilføj følgende kode under den tidligere kode:
123456789101112131415161718 | Sub HideQuick ()WindowsMediaPlayer1.Visible = FalskWindowsMediaPlayer1.Controls.pauseAfslut SubSub ShowQuick ()WindowsMediaPlayer1.Visible = TrueWindowsMediaPlayer1.Controls.PlayAfslut Sub |
Tilføj derefter genveje til de 2 makroer (Værktøjer-> Makro-> Makro-> Indstillinger), og du har en øjeblikkelig ON/OFF-knap lige ved hånden.
Sidebemærkning: Selvom det er interessant at se en film direkte i Excel, er min foretrukne måde at se en film, mens du arbejder, at bruge stand alone Media Player med et par forskellige muligheder.
I menuen Værktøjer-> Indstillinger skal du markere afkrydsningsfeltet "Vis på toppen i hudtilstand". Vælg "Hudtilstand" i menuen Vis (en lille hud fungerer bedst). Flyt din film nederst til højre eller venstre på skærmen.
Med denne opsætning kan jeg arbejde og også skifte mellem apps og altid have min film synlig, men alligevel ude af vejen. Tak til Kingzter.