Ｐａｇｅ 567 ━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━ 通常モードに戻る ┃ ＩＮＤＥＸ ┃ ≪前へ │ 次へ≫ ━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━ ▼パワーポイントのスライドショーを実行するには TOSHI 03/1/18(土) 18:13 ┗Re:パワーポイントのスライドショーを実行するには JuJu 03/1/18(土) 19:59 ┗Re:パワーポイントのスライドショーを実行するには TOSHI 03/1/18(土) 20:16 ─────────────────────────────────────── ■題名 ： パワーポイントのスライドショーを実行するには ■名前 ： TOSHI <nakayama@do-frontier.com> ■日付 ： 03/1/18(土) 18:13 -------------------------------------------------------------------------
| エクセルのワークシートよりＶＢＡを使用して、パワーポイントの指定したスライドショーを実行することは可能でしょうか？ よろしくお願いします。 |
| TOSHIさん、こんにちはぁ >エクセルのワークシートよりＶＢＡを使用して、パワーポイントの指定したスライドショーを実行することは可能でしょうか？ >よろしくお願いします。 可能です^^ シートにコマンドボタンを２個貼り付けて実行してみてね。 '---- 8< ---- 8= ---- 8< ---- 8= ---- 8< ---- 8= ---- Private objPPT As Object ' ファイルを開いて、スライドショー実行 Private Sub CommandButton1_Click() '' ファイルを開く（実際のファイル名に変更してね） Set objPPT = GetObject("C:\My Documents\test.ppt") '' スライドショー実行 objPPT.SlideShowSettings.Run End Sub ' パワーポイントの終了 Private Sub CommandButton2_Click() objPPT.Application.Quit Set objPPT = Nothing End Sub こんな感じです。 ではではぁ |
| JuJuさん こんばんは ありがとうございます！！ 本当に助かりました。早速試してみます。 |