Wordで全てのインデントを削除するにはどうすればよいですか？

Author Amanda Li Last modified 2025-08-26

インデントは、Word文書で読みやすさと構造を向上させるために一般的に使用されます。しかし、より均一な外観を作成したり、文書を再フォーマットしたりするために、すべてのインデントを削除する必要がある場合もあります。

このチュートリアルでは、Word文書内のすべてのインデントを削除する手順を説明し、フォーマットプロセスを合理化するお手伝いをします。

レイアウト（ページレイアウト）で全てのインデントを削除
段落機能を使用して全てのインデントを削除
便利なツールを使って全てのインデントを削除
VBAを使用して全てのインデントを削除

レイアウト（ページレイアウト）で全てのインデントを削除

選択した段落または全体の文書から、Wordのページレイアウト設定を調整することで、すべてのインデントを迅速に削除できます。

注意: この方法では、スペースやタブ文字によって作成された最初の行のインデントは削除できません。そのような場合は、VBAまたはKutools for Wordの使用を検討してください。

インデントを削除したい段落を選択します。文書全体からすべてのインデントを削除する場合は、Ctrl + Aを押してすべてを選択します。
「段落」グループの下の レイアウト タブで、次の操作を行います：
1. 左ボックスに 0 を入力し、Enterキーを押します。
2. 右ボックスに 0 を入力し、Enterキーを押します。

これで、すべてのインデント（スペースやタブ文字で作成された最初の行のインデントを除く）が削除されました。

段落機能を使用してすべてのインデントを削除

Wordの段落機能を使用すると、選択した段落からすべての左および右インデントを迅速に削除できます。以下の手順に従って、効率的にインデントを削除しましょう。

注意: この方法では、スペースやタブ文字を使用して作成された最初の行のインデントは削除されません。そのような場合は、VBAまたはKutools for Wordの使用を検討してください。

インデントを削除したい段落を選択し、右クリックしてコンテキストメニューから「段落」を選択します。
段落ダイアログボックスで：
1. 左と右のフィールドにそれぞれ 0 を入力します。
2. 特殊ドロップダウンリストから「なし」を選択します。
3. OKボタンをクリックします。

すべてのインデント（スペースやタブで作成された最初の行のインデントを除く）が即座に削除されます。

Kutools for Wordを使用してすべてのインデントを削除

Wordで全てのインデントを削除するのは難しい場合があります。形式機能ではスペースやタブ文字で作成された最初の行のインデントが削除されず、VBAメソッドは複雑すぎるためです。最も便利な解決策は、Kutools for Wordを使用することです。これにより、ワンクリックで全てのインデントを削除できます。

Kutools for Word、AI 🤖を搭載し、100 以上の便利な機能を提供して作業を簡素化します。

今すぐダウンロード

文書からすべてのインデントを削除するには、Kutools > インデント > すべてのインデントを削除をクリックします。すべての種類のインデントが即座に削除されます。

ヒント: Kutools for Wordのインデント削除機能を使用すると、特定のタイプのインデント（スペース/タブインデント、最初の行のインデント、左インデント、右インデントなど）もワンクリックで削除できます。

Kutools for Word は、作業を効率化し、文書処理スキルを向上させる究極の Word アドインです。今すぐ入手してください！

Office Tab: Word、Excel、PowerPointにタブインターフェースを提供します。

Navigate through documents using Office Tab

今すぐワークフローを強化しましょう。Office Tabについてさらに詳しく 無料ダウンロード

VBAを使用してすべてのインデントを削除

マクロに精通している場合、VBAコードを使用して選択範囲または全体のWord文書からすべてのインデントを簡単に削除できます。以下の手順に従ってください：

インデントを削除したい段落または文書全体を選択します。

次に Alt + F11 を押してVBAウィンドウを開きます。その後、「挿入 > モジュール 」をクリックして新しいモジュールウィンドウを作成し、次のコードをウィンドウに貼り付けます：

Sub remove_indents()
With Selection.ParagraphFormat
.CharacterUnitLeftIndent = 0
.CharacterUnitRightIndent = 0
.CharacterUnitFirstLineIndent = 0
.LeftIndent = CentimetersToPoints(0)
.RightIndent = CentimetersToPoints(0)
.FirstLineIndent = CentimetersToPoints(0)
End With
End Sub
Sub remove_all_the_first_line_indent_spaces()
Dim i As Paragraph, n As Long
Application.ScreenUpdating = False 'close screen and refresh
For Each i In ActiveDocument.Paragraphs 'cycling in the paragraphs of the active document
For n = 1 To i.Range.Characters.Count
If i.Range.Characters(1).Text = " " Or i.Range.Characters(1).Text = "　" Or i.Range.Characters(1).Text = Chr(9) Then
i.Range.Characters(1).Delete
Else: Exit For
End If
Next n
Next
Application.ScreenUpdating = True 'restore screen and refresh
End Sub
Sub remove_all_indents()
remove_indents
remove_all_the_first_line_indent_spaces
End Sub