Sub 動画をブラウザで再生する() '↓動画の直接URL ThisWorkbook.FollowHyperlink "https://excel3000.web.fc2.com/gazo/sample_video.mp4" End Sub