Excelでセル内の複数行を一括インデントする方法

Excelで1つのセル内に複数行テキストがある場合、各行の左側を揃えて空白を入れたいことがあります。標準のインデントキーはセル全体に適用されるため、複数行を個別に揃えるには少し工夫が必要です。

1. Alt+Enterで改行されたセルの構造

まずセル内で改行を入れる場合は、Shift+EnterではなくAlt+Enterを使用します。これにより、1つのセル内に複数行が正しく作成されます。

2. インデントキーの使い方

セル全体にインデントを入れたい場合はホームタブの「インデントを増やす」ボタンをクリックします。ただし、これはセル全体に適用され、行ごとの微調整はできません。

3. 各行の先頭にスペースを挿入

セル内で各行を個別に右にずらしたい場合は、Alt+Enterで改行した後、各行の先頭にスペースを入力します。手作業になりますが、短いテキストなら効率的です。

4. VBAを使って自動インデント

複数行のセルが多い場合は、VBAマクロで各行の先頭に指定数のスペースを追加することが可能です。以下のような簡単なコードで実行できます：
Sub IndentCellLines()
Dim cell As Range
For Each cell In Selection
cell.Value = Replace(cell.Value, Chr(10), Chr(10) & " ")
Next cell
End Sub

まとめ

Excelでセル内の複数行を左に空白を入れて揃えるには、手作業でスペースを追加する方法や、VBAマクロで自動化する方法があります。インデントキーだけではセル全体の適用となるため、行ごとの微調整が必要な場合はスペースやマクロを活用すると便利です。