Excel VBA から埋め込み PowerPoint を編集する
-
02-07-2019 - |
質問
Excel ワークブックに PowerPoint プレゼンテーションが埋め込まれています。VBA を使用してこれを編集 (開く、スライドをコピー、スライドにデータを追加、閉じる) するにはどうすればよいですか?
解決
1.PowerPoint オブジェクト モデルへの参照を VBA アプリケーションに追加します。
VBA ウィンドウから、 ツール|参照
探す Microsoft Powerpoint 12.0 オブジェクト ライブラリ そしてそれをチェックしてください
2.PowerPoint プレゼンテーション オブジェクトを選択してアクティブ化します。
ActiveSheet.Shapes("Object 1").Select
Selection.Verb Verb:=xlOpen
注記:このコードは、PowerPoint オブジェクトの名前が次であることを前提としています。 オブジェクト 1 (左上隅を見て実際の名前を確認してください)、アクティブ シート上にあることを確認します。
3.Presentation オブジェクトへの参照を取得します。
Dim p As PowerPoint.Presentation
Set p = Selection.Object
4.それを操作してください
プレゼンテーション オブジェクトのすべてのメソッドとプロパティを使用できます。スライドを追加する例を次に示します。
p.Slides.Add 1, ppLayoutBlank
5.選択を解除します
最も簡単な方法は、セルを選択することです。
[a1].Select
お役に立てば幸いです!
所属していません StackOverflow