Banner

Monday, February 27, 2017

Play Youtube Video IN Userform EXcell VBA





Private Sub CommandButton1_Click()

Me.ShockwaveFlash1.Movie = "https://www.youtube.com/v/acIOtfweCXY&vq=hd720"

Me.ShockwaveFlash1.AllowFullScreen = True

End Sub

No comments:

Post a Comment

Please do not enter any spam message in comment box