Excel VBAで列の幅を自動調整する

Excel VBAで列の幅を自動調整する

Posted at July 1,2015 2:22 AM
Tag:[Excel]

Excel VBAで列の幅を自動調整する方法を紹介します。

1.問題点

次のようにExcelでA列のセルに文字を設定しています。

ExcelでA列のセルに文字を設定

このセルの横幅を自動調整したいのですが方法が分かりません。

ということで、列や幅を自動調整する方法を紹介します。

2.VBAで列や幅を自動調整する

VBAで列や幅を自動調整するには、AutoFitというメソッドを利用します。

A列全体で一番長いものに合わせるのであれば、次のコードを標準モジュールに設定します。

Sub test()
    Columns("A").AutoFit
End Sub

実行結果(A1セルの横幅にあわせる)
特定のセルの横幅に合わせる

特定のセルの横幅に合わせるのであれば、次のコードを標準モジュールに設定します。

Sub test()
    Range("A2").Columns.AutoFit
End Sub

実行結果(A2セルの横幅にあわせる)
特定のセルの横幅に合わせる

関連記事
トラックバックURL


コメントする
greeting

*必須

*必須(非表示)


ご質問のコメントの回答については、内容あるいは多忙の場合、1週間以上かかる場合があります。また、すべてのご質問にはお答えできない可能性があります。予めご了承ください。

太字イタリックアンダーラインハイパーリンク引用
[サインインしない場合はここにCAPTCHAを表示します]

コメント投稿後にScript Errorや500エラーが表示された場合は、すぐに再送信せず、ブラウザの「戻る」ボタンで一旦エントリーのページに戻り(プレビュー画面で投稿した場合は、投稿内容をマウスコピーしてからエントリーのページに戻り)、ブラウザをリロードして投稿コメントが反映されていることを確認してください。

コメント欄に(X)HTMLタグやMTタグを記述される場合、「<」は「&lt;」、「>」は「&gt;」と入力してください。例えば「<$MTBlogURL$>」は「&lt;$MTBlogURL$&gt;」となります(全て半角文字)