こちらの記事はエクセルVBAをあまり知らない方でも利用できる「コピペでVBA(Excel)」としてもご活用できます。詳しくはこちらをご確認ください。

このマクロの解説

このコードを実行すると、アクティブなシートのすべての行の高さと列幅を自動調整(セル内の値に対して自動でフィット)します。

このマクロのコード

Private Sub Auto_Fit()
    Cells.EntireColumn.AutoFit
    Cells.EntireRow.AutoFit
End Sub

このマクロを使う理由

行全体または列全体を選択してダブルクリックでも同じことが可能ですが、マクロを使えば、行と列を同時に処理することができます。また、シート全体ではなく、任意の行や列を指定して実行することもできます。

プラスワン

任意の行や列を対象としたい場合は以下のように指定してください。

Private Sub Auto_Fit()
    Columns("C:E").AutoFit
    Rows("5:10").AutoFit
End Sub