Word で複数またはすべての画像を一括でリサイズする方法は？

インターネットや他のファイルから画像をコピーまたはインポートすると、そのサイズが大きく異なることがあります。画像を1 つずつリサイズするのは一般的な作業ですが、複数の画像に対して行うと非常に時間がかかります。このチュートリアルでは、まず単一の画像のリサイズ方法を解説し、その後、複数の画像を効率的にリサイズする手法をご紹介します。

Word で手動で画像のサイズ変更

Kutools for Word を使用して複数の画像を一度にリサイズ

VBA で画像のサイズ変更を特定の寸法に

---

Word で手動で画像のサイズ変更

1. サイズ変更ハンドルを表示するには、画像を選択してください。
2. 目的の寸法になるまで、いずれかのサイズ変更ハンドルをドラッグしてください。

   

注：この方法では、複数の画像を同時にリサイズできません。各画像を個別にリサイズする必要があります。

---

Kutools for Word を使用してすべての画像を一括でリサイズ

Kutools for Wordの画像のサイズ変更ユーティリティを使えば、ドキュメント内のすべての画像を簡単に一括リサイズでき、Word で1 枚ずつ手動で調整する手間と時間を大幅に節約できます。この機能で、画像のサイズ変更がより素早く、効率的に！

• すべての画像を元の元のサイズの特定のパーセンテージにリサイズするには：
  • クリックしてKUTOOLS PLUS＞サイズ変更を選択し、ドロップダウンリストから6 つのパーセンテージのいずれかを選びましょう。たとえば、50%を選択すれば、すべての画像が元のサイズの半分にリサイズされます。
• すべての画像を選択した画像のサイズに合わせるには：
  1. モデルとなる画像のサイズを選択してください。
  2. クリックしてKUTOOLS PLUS＞サイズ変更＞選択に基づいてすべての画像をリサイズを選択します。これにより、すべての画像が選択した画像と同じサイズに自動でリサイズされます。
• さらに詳細なオプションが必要な場合は、KUTOOLS PLUS > サイズ変更 > カスタマイズをクリックして、高度なサイズ変更設定にアクセスしてください。

Kutools for Wordの画像のサイズ変更ユーティリティについて詳しく知りたい方は、こちらをクリックして完全なガイドとステップバイステップの手順をご覧ください。

---

VBA で画像を特定の寸法にリサイズする

次の VBA コードを使用すると、画像を理想のサイズにリサイズできます。以下の例では、画像の高さを1.78 インチ、幅を3.17 インチにリサイズする方法を示しています。

1. 選択してくださいリサイズしたい画像を。
2. Alt + F11を押して、Microsoft Visual Basic for Applicationsウィンドウを開きます。
3. クリックしてモジュール挿入タブから、次の VBA コードをコピーしてモジュールウィンドウに貼り付けます。

   Sub ResizePics()
   Dim shp As Word.Shape
   Dim ishp As Word.InlineShape
   If Word.Selection.Type <> wdSelectionInlineShape And _
   Word.Selection.Type <> wdSelectionShape Then
       Exit Sub
   End If
   If Word.Selection.Type = wdSelectionInlineShape Then
       Set ishp = Word.Selection.Range.InlineShapes(1)
       ishp.LockAspectRatio = False
       ishp.Height = InchesToPoints(1.78)
       ishp.Width = InchesToPoints(3.17)
   Else
       If Word.Selection.Type = wdSelectionShape Then
           Set shp = Word.Selection.ShapeRange(1)
           shp.LockAspectRatio = False
           shp.Height = InchesToPoints(1.78)
           shp.Width = InchesToPoints(3.17)
       End If
   End If
   End Sub

   注：上記のコードでは、shp.Height = InchesToPoints(1.78)およびshp.Width = InchesToPoints(3.17)が、画像の高さと幅（インチ単位）を定義しています。必要に応じて、これらの値は自由に変更できます。

4. クリックして実行ボタンを押すか、F5キーを押して VBA コードを実行してください。選択した画像が指定された寸法にリサイズされます。

この VBA コードは便利ですが、すべての画像または複数の画像を一度にリサイズすることはできません。各画像を個別に選択してリサイズするには、Word ドキュメントとMicrosoft Visual Basic for Applicationsウィンドウを行き来する必要があり、時間がかかることもあります。そんなときは、Kutools の方法をご利用ください。

---

デモ：Word で画像のサイズ変更する方法

---