【Word VBA/マクロ】インデント解除

サンプルコードでできること

インデントを解除します。

Sub インデントなしに設定()
    With Selection.ParagraphFormat
        .CharacterUnitLeftIndent = 0
        .CharacterUnitFirstLineIndent = 0
        .LeftIndent = 0
        .FirstLineIndent = 0
    End With
End Sub

コードの説明

左インデントが「1字」に設定されている段落で、次のコードを実行します。

    With Selection.ParagraphFormat
        .CharacterUnitLeftIndent = 0
        .CharacterUnitFirstLineIndent = 0 '今回の例ではなくてもOK
    End With

CharacterUnitLeftIndentは左インデント、CharacterUnitFirstLineIndent は字下げインデントのプロパティです。

コードを実行した結果がこちらです。

「1字」が「3.7mm」に変わっただけで、0になりません。LeftIndentを0に指定する必要があります。

        .LeftIndent = 0
        .FirstLineIndent = 0'今回の例ではなくてもOK