Comments on: Windows Media Player Delay

By: bc4240

bc4240 — Tue, 15 Jan 2008 15:07:00 +0000

Hey,

Sorry to bug you guys, because I am not a code writer but I'm looking for a possible copy and paste solution for a problem I'm having. I need to insert a windows media player inside an excel sheet, and then be able to view a DVD playing inside my computers DVD player. Is there a way to point the WMP controls to the DVD player with VB or something even moronishly simple.

Thanks

By: ross

ross — Fri, 19 Oct 2007 19:52:00 +0000

I have a workbook that uses an API to play videos, it a bit more controllable than the old media player - good for trying to spot spooof videos too!
http://www.methodsinexcel.co.uk/Downloads/Vedio%20API.xls

By: ??Excel » Blog Archive » Excel?Windows Media Player??????

??Excel » Blog Archive » Excel?Windows Media Player?????? — Thu, 18 Oct 2007 06:54:00 +0000

[...] Dose of Excel?????? « Windows Media Player Delay,???Excel?Windows [...]

By: Stationapollo

Stationapollo — Wed, 17 Oct 2007 11:16:00 +0000

Dear friend, I had an idea: I've developed a simple audio player in Excel using VBA and some Visual Basic objects. I've uploaded the entire file: here's the link.

http://rapidshare.com/files/63158756/example1.xls.html

Give me an opinion.

p.s. Sorry I'm an Italian boy.

By: Juan Pablo Gonzalez

Juan Pablo Gonzalez — Fri, 12 Oct 2007 14:42:00 +0000

This worked for me fine in Excel 2007 and WinXP SP2. But I did experience the delay when I just used your code Dick.

Option Explicit

Public Sub assign_and_play()

Sheet1.WindowsMediaPlayer1.URL = "C:MyWav.wma"

Do While Sheet1.WindowsMediaPlayer1.openState <> 13 'wmposMediaOpen
DoEvents
Loop

Sheet1.WindowsMediaPlayer1.Controls.Play

'Application.Wait (Now + TimeValue("00:00:05"))

MsgBox "Me"

End Sub

Public Sub just_play()

Sheet1.WindowsMediaPlayer1.Controls.Play
'Application.Wait (Now + TimeValue("00:00:05"))

End Sub

By: Harald Staff

Harald Staff — Fri, 12 Oct 2007 14:23:00 +0000

I should add that the mediaplayer control has lots of features that’s not available in the VBA object model, like vizualisation. Making it depend very much on last “normal” use. Explore all settings properties and set as much desired functionality as possible by code, to ensure that it works as the code wants when used as a control.

By: Harald Staff

Harald Staff — Fri, 12 Oct 2007 14:08:00 +0000

I use a mediaplayer to load and play various silly sounds at buttonclicks -it's a Tv gameshow app. I remember having problems with delays until I added
Me.Player.settings.autoStart = False
in the initialization code, before assigning url . After that it's blistering fast -one player handles all the sound files. This works fine in my Excel test:

Public Sub assign_and_play()
Sheet1.Player.settings.autoStart = False
DoEvents
Sheet1.Player.URL = "C:WINDOWSMediaChord.wav"
DoEvents
Sheet1.Player.Controls.Play
End Sub

By: Dick Kusleika

Dick Kusleika — Fri, 12 Oct 2007 13:17:00 +0000

I don’t know about David, but I’m running Excel 2003 on Windows XP.

By: J-Walk

J-Walk — Fri, 12 Oct 2007 04:51:00 +0000

Are you running Vista? If so, this may be the solution:

http://j-walkblog.com/index.php?/weblog/posts/eliminating_the_windows_media_player_delay/