VBAでPowerPointへテキストボックスを追加し文字入力する方法!既存文字変更も!VBAでPowerPointへテキストボックスを追加し文字を入力したいときはないでしょうか。・VBAでPowerPointへテキストボックスを追加し文字を入力する方法がわからない・VBAでPowerPointへ既存のテキストボックスにある文字を変更する方法がわからないですよね。VBAでPowerPointへテキストボックスを追加し文字を入力するイメージについて説明をします。PowerPointへ入力したい文字を用意します。スライドタイトルや見出しなどです。転記したいパワーポイントのファイル名とパスをメモします。台帳となるExcelシートを用意し先ほどの文字列とパワーポイントへのパスを入力し、挿入したいスライド番号を指定します。VBAでPowerPointへテキストボックスを追加し文字を入力するための下準備をしていきましょう。パワーポイントファイルを準備するパワーポイントファイルを準備しましょう。サンプルでは3スライド使いますので、3スライドのファイルを用意しました。Excel台帳ファイルを準備する文字列の転記先とパワーポイントのパスを記載する台帳を用意します。各セルの構成は以下の通りです。C1セルには文字を転記したいパワーポイントのファイルのパスを入れます。C1パワーポイントのファイルのパス4列目以降にパワーポイントに文字挿入をしたい内容を入れていきます。次に埋め込み先となるパワーポイントのスライド番号を指定します。本文Excelからパワーポイントを操作できるよう設定するExcelからパワーポイントをVBAで操作できるよう設定をしていきましょう。1Excelを起動し、「開発」タブをクリックします。2VBEの画面が開いたら、メニューから「ツール」>「参照設定」を選択します。Library」を探してチェックボックスにチェックし「OK」をクリックします。タカヒロこの設定がないと、マクロ実行後にエラーとなりますのでかならず設定するようお願いします。VBAでPowerPointへテキストボックスを追加し文字を入力するサンプルコードは以下の通りです。'PowerPointアプリケーションをセットします。'Excelの最初のシートを参照します。PowerPointのファイルパスを取得します。'列の最終行を取得します。'Excelシートの各行に対して処理を行います。パワーポイントのスライドを取得します。タイトルを追加します。'見出しの数をカウントします。'テキストボックスを追加します。'テキストボックスに文字を追加します。'文字を太字にします。'フォントサイズを変更します。'本文の数をカウントします。'テキストボックスを追加します。'テキストボックスに文字を追加します。'フォントサイズを変更します。"OKであれば保存してください。SubVBAの実装VBAの実装方法についてはVBAの実装手順をご参照ください。実行するVBAを実行しましょう。「パワーポイントへ文字列を貼り付けました!OKであれば保存してください。」が表示されたら完了です。パワーポイントをみてみましょう。はい!パワーポイントへ文字列が貼り付けられましたね!タカヒロマクロ実行直後はパワーポイントは保存されていませんので、文字列の貼り付けが問題なければ保存するようにしてください。VBAでPowerPointへテキストボックスを追加し文字を入力するVBAについて説明をします。PowerPointアプリケーションをセットします。CreateObject("PowerPoint.Application")Excelの最初のシートを参照します。ThisWorkbook.Sheets(1)PowerPointのファイルパスを取得します。3).Value)列の最終行を取得します。1).SpecialCells(xlLastCell).rowExcelシートの各行に対して処理を行います。intlastRow見出し本文のカウントを初期化します。0パワーポイントのスライドを取得します。1).Value)タイトルを追加します。objPPTSlide.Shapes.Titleタイトルに文字を追加します。2).Value見出しの処理です。見出しの文字列があれば処理を開始します。Then見出しの数をカウントします。1テキストボックスを追加します。50)テキストボックスに文字を追加します。3).Value文字を太字にします。Trueフォントサイズを変更します。本文の文字列があれば処理を開始します。Then本文の数をカウントします。1テキストボックスを追加します。50)テキストボックスに文字を追加します。4).Valueフォントサイズを変更します。VBAでPowerPointの既存テキストボックス内の文字を変更する方法について説明をします。前回と同じコードを使います。パワーポイントの3スライド目のタイトルを変更対象とします。タイトルに何か文字列がある状態にします。Excel台帳側で既存文字列があるスライド番号と変更したいタイトル名を入力します。VBAを実行しましょう。実装手順は以下の通りです。Excel側にVBAを実装していきます。1Excelを新規に開き、「開発」タブをクリックし、「VisualBasic」をクリックします。ショートカットキー「Alt」+「F11」でもOKです。2標準モジュールを追加します。モジュール」を選択します。3右ペインのウインドウに上記のVBAを入力します。VBAを実行するでは早速VBAの実行をしてみましょう。1「開発」タブの「VBA」をクリックし実行したいマクロを選択し、「実行」をクリックします。2処理がされたことが確認できれば完了です。さいごにいかがでしょうか。・VBAでパワーポイントにエクセル文字列を位置調整した上貼り付ける方法についてまとめました。他にも便利な方法がありますので、よろしければご参照頂ければと思います。この記事の関連キーワードこちらの記事の関連キーワード一覧です。クリックするとキーワードに関連する記事一覧が閲覧できます。「文字列」の関連記事こちらの記事の内容「文字列」に関連する記事一覧です。コメントをキャンセルメールアドレスが公開されることはありません。*サイト次回のコメントで使用するためブラウザーに自分の名前、メールアドレス、サイトを保存する。VBA文字列VLOOKUPの検索方法はFALSEとTRUEどっち?0と1の使い分けも!COUNTIF関数で~以外をカウントする方法!文字の他数字の条件指定も!RECOMMENDこちらの記事も人気です。