
Excelのセルの幅を一括で自動調整するVBAのサンプルコード(VBAのAutoFitの使用例)
Excelのセルの幅を一括で自動調整するVBAのサンプルコードを紹介します。仕様Excelを使っていると、以下のようなことがあります文字切れで文章が見えなくなる無駄にセルの幅が広くて見た目が悪い。例えば以下のキャプチャはIDや年齢の幅が広すぎますし、名前の幅は狭すぎて何が書いてあるかわかりません。今回のVBAのサンプルコードは、この幅を自動調整するサンプルコードです。手動で直す場合ちなみに手動で修正する場合は、以下の操作を実施します。対象のセルの幅を広げます。書式メニューから「列の幅の自動調整(I)」を選択します。※セルの境目でダブルクリックするともっと早いですね。すると、以下のように幅が調整されます。VBAもこれをプログラムにするだけですね。ソースコードソースコードは以下のとおりです。AutoFitを使用するのがポイントになります。そして実行していることは基本的に手作業でしていたことを、自動化しただけであるというのもポイントです。Option ExplicitSub AutoFitColumns() '最右端の列番号の取得(表が2行目から始まっているため、2行で評価していることに注意...