' <使い方> ' 1. Power Point の「Visual Basic Editor」を起動。 ' 2. [挿入] - [標準モジュール] を選択。 ' 3. 下記のコードを貼り付け。 ' 4. [表示] - [イミディエイトウィンドウ] を選択。 ' 5. [実行] - [Sub/ユーザー フォームの実行] を選択。 ' これで、「イミディエイトウィンドウ(デバッグウィンドウ)」に ' テキストボックスの内容が表示されます。 Sub TextBoxToDebugPrint() Dim slide For Each slide In ActiveWindow.Parent.Slides Dim shape For Each shape In slide.Shapes Debug.Print shape.TextFrame.TextRange.Text Next Next End Sub