Office XPのPowerPointのマクロで2つのスライドショーを制御したいと考えています。
<想定している動作>
1)スライドショーAはエンドレスで流れている
2)スライドショーA内にあるリンクボタンを押すと、スライドショーBが流れ始める(マクロを実行)
3)スライドショーBは1回流れるとスライドショーAに切り替わる
4)スライドショーAがエンドレスで流れ始める
マクロを途中まで作成したのですが、4)で、スライドショーAがリンクボタンを押した状態のまま固まってします。
ソースは以下です。
Declare Sub Sleep Lib "kernel32" (ByVal dwMilliseconds As Long)
Sub slide()
PowerPoint.Presentations.Open ("C:\スライドB.ppt")
With
ActivePresentation.Slides.Range.SlideShowTransition
.AdvanceOnClick = msoFalse
.AdvanceOnTime = msoTrue
'表示秒数
.AdvanceTime = 30000
End With
With ActivePresentation.SlideShowSettings
.ShowType = ppShowTypeSpeaker
.LoopUntilStopped = msoFalse
'繰り返し上映はしない
.ShowWithNarration = msoTrue
.ShowWithAnimation = msoTrue
.RangeType = ppShowAll
.AdvanceMode = ppSlideShowUseSlideTimings
.PointerColor.SchemeColor = ppForeground
.Run
End With
Sleep (1000)
SlideShowWindows(Index:=1).View.Next
Sleep (1000)
SlideShowWindows(Index:=1).View.Next
Sleep (1000)
SlideShowWindows(Index:=1).View.Exit
Sleep (1000)
ActivePresentation.Close
PowerPoint.ActiveWindow.Activate
End Sub
どなたかお分かりになる方いらっしゃいますか?
上のソースをベースにしなくても良いので、ぜひアドバイスお願いします!
No.1ベストアンサー
- 回答日時:
以下の方法はどうでしょう。
"スライドB.ppt"
は、個別にスライドショーのアニメーション設定や画面切り替え設定を施しておき、プレゼンテーション形式
"スライドB.pps"
で保存します。
スライドショーAでは次のコード(例えばCommandbutton1のクリックイベント)で呼び出します。
Private Sub CommandButton1_Click()
PowerPoint.Presentations.Open ("C:\スライドB.pps")
End Sub
なお、スライドB.ppsは終了すると勝手に閉じて、スライドショーAの続きがスタートします。
環境は違いますが、Win2000+Powerpoint2000で成功しました。
お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!
似たような質問が見つかりました
- Excel(エクセル) 【マクロ】スクショ印刷がうまく動かない件 5 2022/12/06 17:37
- Visual Basic(VBA) 複数セルに〇印をつけるマクロ 4 2022/09/07 05:33
- Visual Basic(VBA) 【VBA】写真の貼り付けコードがうまく機能しません。 5 2022/09/01 18:43
- Visual Basic(VBA) ExcelVBAのマクロについて。 9 2022/05/04 14:50
- Visual Basic(VBA) excel2021で実行できないマクロ。どこを直したらいいのか 2 2022/03/28 03:40
- Visual Basic(VBA) いつもお世話になっております、VBAで教えて頂きたいのですが 2 2022/05/05 22:20
- Visual Basic(VBA) Powerpointでランダムな数字の結果を表示するマクロ 2 2023/08/04 10:04
- Visual Basic(VBA) まとめシートから集計シートへA列のコードが一致したら1行コピーするマクロをネット上で見つけました。こ 1 2022/08/30 14:11
- Visual Basic(VBA) エクセルのマクロについて教えてください。 1 2022/10/13 08:41
- Visual Basic(VBA) ExcelVBAで、index、match関数を使用して、指定範囲に出力したい 3 2022/10/18 21:53
関連するカテゴリからQ&Aを探す
おすすめ情報
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
パワーポイントで動画再生後次...
-
pdfファイルをスライドショーで...
-
パワーポイント2007で、スライ...
-
パワーポイント、途中までしか...
-
挿入したサウンドの音量を特定...
-
パワーポイントのスライドショ...
-
パワーポイントを使用しながら...
-
パワーポイントナレーション音...
-
現在のページからスライドショ...
-
パワーポイントのスライドショ...
-
パワーポイント2000で自動...
-
30分間の発表の原稿
-
パワーポイントでスライドごと...
-
トイレスライド錠の分解の仕方
-
パワーポイントのスライドを取...
-
パワーポイント アニメーショ...
-
パワーポイントのレイアウトで...
-
パワーポイントをノートつきで...
-
パワーポイントで一ページだけ...
-
パワーポイントのスライド名変...
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
パワーポイントのスライドショ...
-
パワーポイントで動画再生後次...
-
パワーポイント、途中までしか...
-
挿入したサウンドの音量を特定...
-
pdfファイルをスライドショーで...
-
パワーポイント2007で、スライ...
-
パワーポイントのスライドショ...
-
パワーポイントナレーション音...
-
パワーポイントのスライドに経...
-
スライドショーにBGMを付け、そ...
-
現在のページからスライドショ...
-
powerpoint2007 画面切り替えが...
-
パワーポイントを使用しながら...
-
パワーポイント2000で自動...
-
PowerPointのスライドショーに...
-
右下からページをめくるような...
-
パワーポイント2003 スライド...
-
マック スライドショー
-
パワーポイントでスライドショ...
-
パワーポイント2010でShift+F5...
おすすめ情報