Excel VBA質問箱 IV

当質問箱は、有志のボランティア精神のおかげで成り立っています。
問題が解決したら、必ずお礼をしましょうね。
本サイトの基本方針をまとめました。こちらをご一読ください。

投稿種別の選択が必要です。ご注意ください。
迷惑投稿防止のため、URLの入力を制限しています。ご了承ください。


	新規投稿 ┃ツリー表示 ┃一覧表示 ┃トピック表示 ┃検索 ┃設定 ┃過去ログ ┃ホーム

39769 / 76738

←次へ　｜　前へ→


	【42077】Re:再度:メディアプレーヤーについて(ichinose様）

カッチャン

- 06/8/31(木) 8:19 -


	引用なし

	パスワード

ありがとうございました。「型が違う」というエラーは発生しなくなりました。
しかし、また問題が発生しました。
　Set cc = Controls.Add("MediaPlayer.MediaPlayer.1")　'..1.
　　If Err.Number <> 0 Then
　　　 Set cc = Controls.Add("WMPlayer.OCX.7")　　’　　..2.
　　End If
MediaPlayerがあるシステムでは問題ないのですが、無いシステムでは1.でエラーを
発生するのではなく、仮のオブジェクトが作成され（無地の四角いボックス）、それから
WMPlayerが作製されます。
　MediaPlayerかWMPlayerが存在するか否かを判断するものがないのでしょうか。
また、今はスライドショウのようなプログラムで、写真やMovieが見れるもので使って
いるのですが、メディアプレーヤーなどを表示したり、消したりするのには
　CC.visible=false　などとしていますが、ここでもオブジェクトがありません
等のエラーがでます。このことにもお教えください。

お忙しいこととは思いますが、よろしくお願いいたします。

0 hits

▼

【41987】メディアプレーヤーについて カッチャン 06/8/28(月) 11:45