VBA – 列幅の自動調整

Written by

Editorial Team

Reviewed by

Steve Rynearson

Translated by

masahiro yoshida

Last updated on 8月 1, 2022

VBAでワークシートを操作した後、できるだけきれいな仕上がりにするために、列の幅を自動調整したいことがあります。ここでは、VBAを使用して列の幅を自動調整する方法を説明します。

VBAを使用した列の幅を自動調整する

このコードは、A列とB列を自動調整します。自動調整は、アクティブなシートに適用されます。

Columns("A:B").EntireColumn.AutoFit

使用した列を全て自動調整する

ワークシートで使用されている全ての列を自動調整させたい場合はどうすればよいでしょうか。上記の方法と使用中の列の数を数える、そしてループを組み合わせて使用します。

次のコードは、VBAを使用して、全ての使用されている列の幅を自動調整します。

Sub AutofitAllUsed()

Dim x As Integer

For x = 1 To ActiveSheet.UsedRange.Columns.Count
    Columns(x).EntireColumn.AutoFit
Next x

End Sub

VBAのコーディングが簡単に

VBAのコードをオンラインで検索するのはもうやめましょう。AutoMacro – A VBA Code Builderについてもっと知る – 初心者が最小限のコーディング知識でゼロから手順をコーディングでき、すべてのユーザーのために多くの時間節約機能を備えています! alt text もっと詳しく

<<VBAのサンプルに戻る

vba-free-addin

VBAコード例アドイン

当サイトで紹介しているすべてのコード例に簡単にアクセス可能。

メニューから選択してクリックするだけで、コードがモジュールに直接挿入されます(.xlam アドイン)。

(インストール不要!)

無料ダウンロード

VBAコード例に戻る