(Excel VBA) 縮小して全体を表示するコマンドをボタンにする
「縮小して全体を表示する」って割と使うと思うんですけど、ボタンがないんですよね。いつもわざわざ「セルの書式設定」開いて設定してるんですが、正直面倒くさいですよね。なので、VBAでコマンド作ってボタン化しています。
コード
Sub DisplayWholeByReducing() ' ◆◆◆ 縮小して全体を表示するコマンド ◆◆◆ With Selection .WrapText = False .ShrinkToFit = True End With End Sub