Excelのこととか色々

Excel のこととか楽天とか いろいろ書いてみます・・・

【Excel/VBAのこと30】ウインド枠の固定/解除をリボンに登録

   f:id:tuna-kichi:20200223230814p:plain

 

他人の作成した Excel の表を参照して仕事をするとき、特に、大きな表の場合、

好みの画面サイズや、欲しい情報のある列のみを表示させることがあります。

 

ウインドウ枠を固定させる も、そのひとつです。

  ウインドウ枠の固定

 

この設定を割と頻繁に行うので、クイックアクセスツールバーに登録しました。

  クイックアクセスツールバーに登録

 

しかし、アイコンクリック > 固定 と2クリック必要です。

しかも、付け直す場合は、

アイコンクリック > 解除 > アイコンクリック > 固定

と4クリック必要になります。

 

この作業を減らすためにマクロ作成してリボンに登録しました。

 

 

マクロ

 

ウインドウ枠解除 > 固定

ウインド枠を解除してから固定します。

ウインドウが固定されていないシートに対して解除のマクロを実行してもエラーになりません。

----------------------------------------------------

Sub ウインドウ枠の固定()
 ActiveWindow.FreezePanes = False
 ActiveWindow.FreezePanes = True

End Sub

ーーーーーーーーーーーーーーーーーーーーー

 

上のマクロのみでは必ずウインドウ枠を固定しますので、解除のみ実行するボタンを作ります。

ウインドウ枠の解除のみ

Sub ウインドウ枠解除のみ()
 ActiveWindow.FreezePanes = False

End Sub

 

                  

 

このマクロを個人用マクロブックの標準モジュールに記述して、リボンに登録します。

  リボンに登録

 

たいしたことない作業なんですが、ワンクリックでも減らせるとストレスも減らせます。

 

**********************************************************

 

個人用マクロブックについてはこちら

www.tuna-kichi.com

 

リボンに登録についてはこちら

www.tuna-kichi.com

 

_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/