Veja ou ouça filmes no Excel, enquanto trabalha no Excel:
1. No menu principal, clique em Inserir-> Objeto
2. Selecione Windows Media Player de Tipo de objeto caixa e clique em OK
3. Mova e redimensione o WMP de acordo com sua preferência
Observação: se você não conseguir redimensionar o objeto WMP, alterne para o “Modo de design” clicando no botão de modo de design 
Agora, adicionaremos algum código para informar ao objeto do Windows Media Player que deve ser reproduzido e qual arquivo deve ser reproduzido. Abra o Editor do Visual Basic (alt + F11), clique duas vezes na planilha que contém o WMP que você acabou de inserir e cole o seguinte código:
| 12345678910 | Sub PlayMovie ()'URL é a localização do filme - mude apropriadamenteWindowsMediaPlayer1.URL = "C: /rb.wmv"WindowsMediaPlayer1.Controls.PlayEnd Sub |
Reproduza o filme da mesma forma que executaria uma macro: Ferramentas-> Macro-> Macros
Você também pode criar alguns atalhos para ocultar e parar a reprodução do filme se o chefe se aproximar. Adicione o seguinte código abaixo do código anterior:
| 123456789101112131415161718 | Sub HideQuick ()WindowsMediaPlayer1.Visible = FalseWindowsMediaPlayer1.Controls.pauseEnd SubSub ShowQuick ()WindowsMediaPlayer1.Visible = TrueWindowsMediaPlayer1.Controls.PlayEnd Sub |
Em seguida, adicione atalhos para as 2 macros (Ferramentas-> Macro-> Macros-> Opções) e você terá um botão liga / desliga instantâneo na ponta dos dedos.
Nota: Embora assistir a um filme diretamente no Excel seja interessante, minha maneira favorita de assistir a um filme enquanto trabalho é usando o Media Player autônomo com algumas opções diferentes definidas.
No menu Ferramentas-> Opções, marque a caixa “Exibir na parte superior quando no modo Pele”. No menu Exibir, selecione “Modo de pele” (uma capa pequena funciona melhor). Mova seu filme para o canto inferior direito ou esquerdo da tela.
Com essa configuração, posso trabalhar e também alternar entre aplicativos e sempre ter meu filme visível, mas fora do caminho. Graças a Kingzter.
