【VBA】セル内の文字列を縮小して全体を表示する

セルの横幅を超えた文字列を、

縮小して全体を表示できます！

VBAコード

ここでは例として、
　・シート「sample」のセル「B2～B3」の
　・文字列を縮小して全体を表示
します。

Sub sample()
    
    '文字列を縮小して全体を表示する
    Worksheets("sample").Range("B2:B3").ShrinkToFit = True

End Sub

「Rangeオブジェクト」の「ShrinkToFit」プロパティに「True」を設定することで、「文字列を縮小して全体を表示」となります。
※「False」を指定すると「文字列を縮小して全体を表示」が解除されます。

セル内の文字列を縮小して全体を表示できました。

上記のVBAコードで使用した以下の詳細は、公式サイトをご確認ください。

●「Rangeオブジェクト」の「ShrinkToFit」プロパティ