列幅を最適化するマクロ

列幅を最適化するマクロ

列A,B,Cのセル幅をそれぞれの列の最長データに合わせて最適化します。
テスト用に次のようなデータを入れて実行してください。
列A　に「おはようございます。」
列B　に「あなたの名前はなんですか？」
列C　に「また会いましょう。」

AutoFitメソッドで最適化

Sub サンプル2200()
      
    Columns("A:C").AutoFit
      
End Sub

シート全体の列幅を最適化するマクロ

シート全体を選択して、シート全体に対して列幅の最適化をします。引数を省略したCellsプロパティを使います。

Sub サンプル2205()

    Cells.Select
    
    Selection.Columns.AutoFit
        
End Sub

●マクロの実行前

●マクロの実行結果
データが入っている列幅を最適化します。

• セルの操作

  列の非表示と再表示のマクロ

以上で「列幅を最適化するマクロ」の説明を終わります。