PowerPoint VBA Tips

この記事は、「いちばんやさしいPowerPoint VBAの教本 伊藤 潔人 著 インプレス」を参考にさせて頂いています。

PowerPointのオブジェクトの階層構造

ExcelとPowerPointのオブジェクトの階層構造

Excel VBAのオブジェクトとPowerPointのオブジェクトの基本的な構造

オブジェクトブラウザー

ローカルウィンドウ

FunctionプロシージャとSubプロシージャの違い

SlideオブジェクトとSlidesコレクション(オブジェクトとコレクション)

P.146

With文

P.91

各用語の意味

テキストの取り込み

Sub テキストの取込()

　　　　Dim Txt as String

　　　　Txt = ActiveWindow.Selection.ShapleRange.TextFrame.TextRange.Text

　　　　Msgbox Txt

End Sub

---

Sub TextFrameを確認する()

Dim trng As TextRange


Set trng = ActivePresentation.Slides(ActiveWindow.Selection.SlideRange.SlideIndex).Shapes(1).TextFrame.TextRange


MsgBox trng.Text

End Sub

---

Sub テキストの取り込み()

Dim Txt As String

Txt = ActiveWindow.Selection.ShapeRange.TextFrame.TextRange.Text

MsgBox Txt

End Sub

---

Sub テキストの取り込み2()

Dim Shprng As ShapeRange

Shprng = ActiveWindow.Selection.ShapeRange

MsgBox Shprng

End Sub