Wordで文書を作成していると、写真や図を挿入したくなることがよくありますよね。手動で挿入するのも良いですが、VBA（Visual Basic for Applications）を使えば、複数の画像を一括で挿入することができます。今回は、初心者の方でも安心して実行できる方法をご紹介します。
VBAとは？
Wordのイメージ
VBAとは、Microsoft Office製品（WordやExcelなど）に組み込まれているプログラミング言語のことです。これを使うことで、普段の作業を自動化したり、効率化したりすることができます。
例えば、毎回手動で画像を挿入している作業も、VBAを使えばボタン一つで自動化できるんです。
画像を挿入する基本的なVBAコード
まずは、Word文書に画像を挿入するための基本的なVBAコードをご紹介します。
Sub 画像挿入()
Dim img As InlineShape
Set img = ActiveDocument.InlineShapes.AddPicture("C:\画像のパス\画像.jpg")
img.LockAspectRatio = msoTrue
img.Width = 100 ' 幅を100ポイントに設定
img.Height = 100 ' 高さを100ポイントに設定
End Sub
このコードを実行すると、指定した場所に画像が挿入され、サイズも調整されます。
複数の画像を一括で挿入する方法
次に、フォルダ内にある複数の画像を一括でWord文書に挿入する方法をご紹介します。
Sub フォルダ内の画像を挿入()
Dim folderPath As String
Dim img As InlineShape
Dim fileName As String
folderPath = "C:\画像のフォルダのパス\"
fileName = Dir(folderPath & "*.jpg") ' フォルダ内のjpgファイルを取得
Do While fileName <> ""
Set img = ActiveDocument.InlineShapes.AddPicture(folderPath & fileName)
img.LockAspectRatio = msoTrue
img.Width = 100 ' 幅を100ポイントに設定
img.Height = 100 ' 高さを100ポイントに設定
fileName = Dir ' 次のファイルを取得
Loop
End Sub
このコードを実行すると、指定したフォルダ内のすべてのjpg画像が順番にWord文書に挿入されます。
画像の配置を調整する方法
画像を挿入した後、その配置を調整することも可能です。例えば、画像を中央に配置したい場合は、以下のようにコードを追加します。
img.Range.ParagraphFormat.Alignment = wdAlignParagraphCenter
これで、挿入した画像が中央に配置されます。
よくある質問や疑問
Q1: VBAコードを実行するにはどうすればいいですか？
Wordを開き、「Alt + F11」でVBAエディタを開きます。新しいモジュールを挿入し、そこにコードを貼り付けて実行することができます。
Q2: 画像のサイズを変更するにはどうすればいいですか？
上記のコード内で、`img.Width`や`img.Height`の値を変更することで、画像のサイズを調整できます。
Q3: 画像の配置を変更するにはどうすればいいですか？
`img.Range.ParagraphFormat.Alignment`の値を変更することで、画像の配置を調整できます。例えば、`wdAlignParagraphLeft`で左寄せ、`wdAlignParagraphRight`で右寄せにできます。
今すぐ解決したい！どうしたらいい？
いま、あなたを悩ませているITの問題を解決します！
「エラーメッセージ、フリーズ、接続不良…もうイライラしない！」
あなたはこんな経験はありませんか？
✅ ExcelやWordの使い方がわからない💦
✅ 仕事の締め切り直前にパソコンがフリーズ💦
✅ 家族との大切な写真が突然見られなくなった💦
✅ オンライン会議に参加できずに焦った💦
✅ スマホの重くて重要な連絡ができなかった💦
平均的な人は、こうしたパソコンやスマホ関連の問題で年間73時間（約9日分の働く時間！）を無駄にしています。あなたの大切な時間が今この悩んでいる瞬間も失われています。
LINEでメッセージを送れば即時解決！
すでに多くの方が私の公式LINEからお悩みを解決しています。
最新のAIを使った自動応答機能を活用していますので、24時間いつでも即返信いたします。
誰でも無料で使えますので、安心して使えます。
問題は先のばしにするほど深刻化します。
小さなエラーがデータ消失や重大なシステム障害につながることも。解決できずに大切な機会を逃すリスクは、あなたが思う以上に高いのです。
あなたが今困っていて、すぐにでも解決したいのであれば下のボタンをクリックして、LINEからあなたのお困りごとを送って下さい。
ぜひ、あなたの悩みを私に解決させてください。
まとめ
VBAを使うことで、Word文書への画像挿入作業を効率化することができます。初心者の方でも、上記のコードを参考にして、自分の作業を自動化してみてください。作業が楽になり、時間も節約できますよ。
他にも疑問やお悩み事があれば、お気軽にLINEからお声掛けください。
コメント