Closing Windows Media Player from Excel?

Hi All,

I used this to play an embedded song for easy listening in my sheet

Private Sub CommandButton1_Click()
 Application.DisplayAlerts = False 'to turn off the warning
 Range("A1").Select
 ActiveSheet.Shapes("Object 9").Select 
 Selection.Verb Verb:=xlPrimary
 Application.DisplayAlerts = True 
 End Sub

I'm wondering if there is any easy way to, with another command button click, simply close windows media player. I can't think of another simple way to stop the song.
I am new to shell commands. Is this the key here?

Thanks in advance!

Hi xlbiznes,

Thanks for your help. I used the actual process name wmplayer.exe as the file location wasn't working, but you made it work out perfectly. Later on I will have to find a better method if windows media player isn't the default player. I think it may not be so easy for embedded object.

This totally rocks for now tho! Thanks so much!

way late, and way after the fact, but thanks. I actually needed to know how to kill calc.exe after I had called it out in a shell. This worked easily.