パワーポイントファイルの中の、テキストを抽出するＶＢＡ。 フォントサイズが20以上のテキストを見つけたら、抽出。 Sub PPT_pdf() Dim ppt As New PowerPoint.Application Dim presen1 As PowerPoint.Presentation Dim save_path As String, file_name As …