Excelで列幅を自動調整するにはどうすればよいですか？

Excelでは、を使用してセルの内容にすばやく合うように列幅を調整できます。 列幅を自動調整 機能。列の幅をその列の最長テキストに基づいて自動的に更新したい場合があります。つまり、セルに長いテキスト文字列を入力すると、列の幅がその内容の長さに合わせて自動的にサイズ変更されます。Excel でこれを処理することは可能ですか?

VBAコードで列幅を自動調整

ショートカットキーで列幅を自動調整

VBAコードで列幅を自動調整

セルの内容の長さで列幅が自動的に更新されるようにするのは興味深いトリックのようです。次のVBAコードを使用して終了できます。

1。 を押し続けます Alt + F11 キー、そしてそれは開きます Microsoft Visual Basic forApplicationsウィンドウ.

2. 次にダブルクリックします このワークブック セクションに VBAプロジェクト 左側のペインのオブジェクトを使用して空のモジュールを開き、次のVBAコードをコピーしてモジュールに貼り付けます。

VBAコード：ブック内の列の自動調整

Private Sub Workbook_SheetChange(ByVal Sh As Object, ByVal Target As Range)
'Update 20141127
Dim xCol, xoutCol
xCol = Target.Column
If xCol > 52 Then
xoutCol = Chr(Int((xCol - 1) / 52) + 64) & _
Chr(Int((xCol - 27) / 26) + 64) & _
Chr(Int((xCol - 27) Mod 26) + 65)
ElseIf xCol > 26 Then
xoutCol = Chr(Int((xCol - 1) / 26) + 64) & _
Chr(Int((xCol - 1) Mod 26) + 65)
Else
xoutCol = Chr(xCol + 64)
End If
Columns(xoutCol & ":" & xoutCol).AutoFit
End Sub

3。 次に、このコードを保存して閉じます。セルに長いテキストを入力すると、列の幅がコンテンツに合わせて自動的に調整されます。

ショートカットキーで列幅を自動調整

次のスクリーンショットのように、セルの内容の一部が非表示になっている複数の列がある場合は、列の幅を一度にサイズ変更して、その内容に合わせます。 次のショートカットキーが役立つ場合があります。

1。 列幅のサイズを変更するデータ範囲を選択します。

2。 押さえつける 他の キーとプレス H+O+I、これで、列幅がすぐに内容に自動調整されました。 スクリーンショットを参照してください：

ご注意： Excel 2003以前のバージョンを使用している場合は、次のショートカットキーを使用する必要があります。 Alt + O + C + A.

関連記事：

Excelで結合されたセルの行の高さを自動調整するにはどうすればよいですか？

Excelのテキストに合わせて行の高さまたは列の幅のサイズを変更するにはどうすればよいですか？