0

VBScript を使用して PowerPoint プレゼンテーションを開いた場合、開いた PowerPoint の各スライドで使用されているテンプレート名を自動的に見つけることができますか? スライドのプロパティを見つけることができるものはありますか?

4

2 に答える 2

1

このような作業を開始する標準的な方法は、VBA でマクロとして記録し、そのマクロを VBScript に "変換" することです。ここでは、翻訳の際の注意事項について説明します

あなたの場合、次のようなことができます:

Set pp = CreateObject("PowerPoint.Application")
pp.Visible = True

Set presentation = pp.Presentations.Open("C:\path\to\your.ppt")
WScript.Echo presentation.TemplateName
slide.Close

各スライドのレイアウトは、次のように取得できます。

For Each slide In presentation.Slides
  WScript.Echo slide.Layout
Next

これはレイアウトの番号を返すことに注意してください。名前が必要な場合は、番号をレイアウト名にマッピングする辞書を作成する必要があります。

于 2013-06-24T13:46:43.730 に答える
0

これが VBS でどのように機能するかはわかりませんが、VBA では次のことができます。

Set pp = CreateObject("PowerPoint.Application")
'pp.Visible = True

Set presentation = pp.Presentations.Open("C:\path\to\your.ppt", False, False, False)

Presentations.Open は通常、プレゼンテーションを新しい可視ウィンドウで開きます。これを行うには、アプリケーションが表示されている必要があります (そうでない場合、エラーが発生します)。そのため、PPT を表示する必要がありました。プレゼンテーションをウィンドウなしで開く場合 (上記の最後の False パラメーター)、アプリを表示する必要はありません。

于 2013-06-25T14:14:35.127 に答える