Excel VBA質問箱 IV

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

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

  新規投稿 ┃ツリー表示 ┃一覧表示 ┃トピック表示 ┃検索 ┃設定 ┃過去ログ ┃ホーム  
8925 / 13644 ﾂﾘｰ ←次へ　｜　前へ→
▼ 【30177】EXCELからパワーポイントをコントロール まさらっきー 05/10/21(金) 10:41 質問[未読]
【30192】Re:EXCELからパワーポイントをコントロール ichinose 05/10/21(金) 13:23 発言[未読]
【30279】Re:EXCELからパワーポイントをコントロール まさらっきー 05/10/24(月) 13:06 質問[未読]
【30298】Re:EXCELからパワーポイントをコントロール まさらっきー 05/10/24(月) 18:00 お礼[未読]
【30306】Re:EXCELからパワーポイントをコントロール ichinose 05/10/24(月) 21:41 発言[未読]
【30177】EXCELからパワーポイントをコントロール
質問  まさらっきー  - 05/10/21(金) 10:41 -
引用なし
パスワード
   エクセル内に作成したコマンドボタンをクリックすると
指定したパワーポイントのファイルが立ち上がり、
指定のスライドを最初に表示させたいのですが・・・。
（普通に立ち上げると先頭のスライドが表示されてしまいます）
いろいろ調べてみましたがわかりませんでした。
アドバイスよろしくお願いします。
【30192】Re:EXCELからパワーポイントをコントロー...
発言  ichinose  - 05/10/21(金) 13:23 -
引用なし
パスワード
   ▼まさらっきー さん：
こんにちは。

>エクセル内に作成したコマンドボタンをクリックすると
>指定したパワーポイントのファイルが立ち上がり、
>指定のスライドを最初に表示させたいのですが・・・。
>（普通に立ち上げると先頭のスライドが表示されてしまいます）
>いろいろ調べてみましたがわかりませんでした。
>アドバイスよろしくお願いします。

'=============================================================
Sub test()
　　With CreateObject("powerpoint.application")
　　　 .Visible = True
　　　 With .Presentations.Open(Filename:=プレゼンのパス).SlideShowSettings
　　　　　 .StartingSlide = 3　'３番目のスライドから表示
　　　　　 .EndingSlide = .Parent.Slides.Count
　　　　　 .RangeType = 2
　　　　　 .Run
　　　　　 End With
　　　 End With
End Sub

試してみてください
【30279】Re:EXCELからパワーポイントをコントロー...
質問  まさらっきー  - 05/10/24(月) 13:06 -
引用なし
パスワード
   試してみました。出来ました。ありがとうございました。
もう一つ質問ですが、スライドショーで開かずに、
通常の状態（右側にスライド番号が見えている）で
立ち上がって、指定したスライドを表示させることが出来ません。
どうすればよいでしょうか？
【30298】Re:EXCELからパワーポイントをコントロー...
お礼  まさらっきー  - 05/10/24(月) 18:00 -
引用なし
パスワード
   問題解決しました。
本当にありがとうございました。
【30306】Re:EXCELからパワーポイントをコントロー...
発言  ichinose  - 05/10/24(月) 21:41 -
引用なし
パスワード
   ▼まさらっきー さん：
こんばんは。

>問題解決しました。
Powerpointについて
私は殆ど知識がありません。
よって、どのように解決したのか記述してほしかったのですが・・・。

まっ、まだ見ていましたら記述してください
  新規投稿 ┃ツリー表示 ┃一覧表示 ┃トピック表示 ┃検索 ┃設定 ┃過去ログ ┃ホーム  
8925 / 13644 ﾂﾘｰ ←次へ　｜　前へ→
ページ：  ┃  記事番号：
2610219
(SS)C-BOARD v3.8 is Free