Wordの文書に挿入された画像のファイル名を、画像そのものに置き換える方法をご紹介します。特に、パソコンやスマホに不安がある方にもわかりやすく、手順を丁寧に解説しますので、安心して進めてください。
はじめになぜ画像のファイル名を置き換えるのか？
Wordのイメージ
例えば、報告書やプレゼン資料に挿入された画像が、ファイル名のままで表示されていると、見た目が不格好で、内容が伝わりにくくなります。そこで、画像のファイル名をそのまま画像に置き換えることで、文書がより見やすく、プロフェッショナルな印象を与えることができます。
準備Word VBAマクロの実行環境を整える
まず、WordでVBAマクロを実行できるように設定を確認しましょう。
- Wordを開き、「ファイル」タブをクリックします。
- 「オプション」を選択し、「セキュリティ センター」をクリックします。
- 「マクロの設定」を選び、「すべてのマクロを有効にする」を選択します。
- 「VBAプロジェクト オブジェクトモデルへのアクセスを信頼する」にチェックを入れます。
これで、VBAマクロを実行する準備が整いました。
ステップ1VBAエディタを開く
次に、VBAエディタを開きます。
- Wordで「Alt」キーを押しながら「F11」キーを押します。
- VBAエディタが開いたら、「挿入」メニューから「標準モジュール」を選択します。
ステップ2マクロコードを入力する
新しく挿入されたモジュールに、以下のコードをコピー＆ペーストしてください。
vba
Sub 画像のファイル名を画像に置き換える()
Dim shp As Shape
Dim imgPath As String
Dim imgName As String
Dim img As InlineShape
For Each shp In ActiveDocument.Shapes
If shp.Type = msoPicture Then
imgPath = shp.LinkFormat.SourceFullName
imgName = Mid(imgPath, InStrRev(imgPath, "\") + 1)
Set img = ActiveDocument.InlineShapes.AddPicture(FileName:=imgPath)
img.Range.InsertAfter imgName
shp.Delete
End If
Next shp
End Sub
このコードは、文書内のすべての画像を順番に処理し、画像のファイル名を画像の下に挿入し、元の画像を削除します。
ステップ3マクロを実行する
コードを入力したら、以下の手順でマクロを実行します。
- VBAエディタを閉じて、Wordに戻ります。
- 「Alt」キーを押しながら「F8」キーを押します。
- 表示されたマクロ一覧から「画像のファイル名を画像に置き換える」を選択し、「実行」をクリックします。
これで、文書内のすべての画像の下に、画像のファイル名が挿入されます。
よくある質問や疑問
Q1: 画像のファイル名が長すぎて文書が乱れませんか？
はい、長いファイル名が挿入されると文書が乱れる可能性があります。その場合、ファイル名を短縮する処理を追加することをおすすめします。
Q2: 画像のリンクを保持したままファイル名を挿入できますか？
はい、リンクされた画像の場合でも、同様の方法でファイル名を挿入できます。ただし、リンクの更新が必要な場合がありますので、注意してください。
Q3: すべての画像に対してこの処理を適用できますか？
はい、このマクロは文書内のすべての画像に対して処理を行います。ただし、特定の画像を除外したい場合は、条件を追加することで対応可能です。
今すぐ解決したい！どうしたらいい？
いま、あなたを悩ませているITの問題を解決します！
「エラーメッセージ、フリーズ、接続不良…もうイライラしない！」
あなたはこんな経験はありませんか？
✅ ExcelやWordの使い方がわからない💦
✅ 仕事の締め切り直前にパソコンがフリーズ💦
✅ 家族との大切な写真が突然見られなくなった💦
✅ オンライン会議に参加できずに焦った💦
✅ スマホの重くて重要な連絡ができなかった💦
平均的な人は、こうしたパソコンやスマホ関連の問題で年間73時間（約9日分の働く時間！）を無駄にしています。あなたの大切な時間が今この悩んでいる瞬間も失われています。
LINEでメッセージを送れば即時解決！
すでに多くの方が私の公式LINEからお悩みを解決しています。
最新のAIを使った自動応答機能を活用していますので、24時間いつでも即返信いたします。
誰でも無料で使えますので、安心して使えます。
問題は先のばしにするほど深刻化します。
小さなエラーがデータ消失や重大なシステム障害につながることも。解決できずに大切な機会を逃すリスクは、あなたが思う以上に高いのです。
あなたが今困っていて、すぐにでも解決したいのであれば下のボタンをクリックして、LINEからあなたのお困りごとを送って下さい。
ぜひ、あなたの悩みを私に解決させてください。
まとめ
今回ご紹介した方法で、Word文書内の画像のファイル名を画像に置き換えることができます。これにより、文書がより見やすく、プロフェッショナルな印象を与えることができます。操作に不安がある方も、手順を一つずつ確認しながら進めてみてください。
他にも疑問やお悩み事があれば、お気軽にLINEからお声掛けください。
コメント