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セルの横幅にあわせる)
特定のセルの横幅に合わせる

関連記事
zenback
人気エントリー
トラックバックURL


コメントする
greeting

*必須

*必須(非表示)


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

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

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

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