Excelで資料作成して提出する時、必ず全シートの拡大率を100%にして、A1セルに移動させなければならない。
これを手動でやっていたら、すごくめんどくさい。
手動ではなくマクロを作って自動にするのが一番良いのですが、これも毎回マクロ実行させないといけないので、めんどくさい。
それならばということで、作成したツールをExcelのアドインとして登録する方法があります。
アドインに登録しておけば、1クリックだけで全シートの拡大率を100%にすることが出来ます。
手間なく実行できるので、この方法を備忘録として残しておくことにしました。
Excelのアドインとは?
マクロをお手軽に使えるようにしてくれる機能です。もっと簡単に言うと、Excelに機能を追加してくれるようなものが、アドインです。
今回であれば、Excelで全シートの拡大率をアップするというアドインを作成し、Excelの機能として追加していきます。
まずはマクロを作成する
まずは、Excelで全シートの拡大率をアップするというマクロを作成します。
[開発]タブからVBAを開いて、以下のコードを貼り付けましょう。
※[開発]タブの追加方法や、VBAでのマクロの作成方法は、ここでは省略します。
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 |
Sub ALLSheet100() Dim sheet As Object ' 一番先頭のシートから末尾のシートまで拡大率を100%にし、A1セルを選択する For Each sheet In ActiveWorkbook.Sheets ' シートをアクティブ化 sheet.Activate ' A1セルを選択 ActiveSheet.Range("A1").Select ' 拡大率を100% ActiveWindow.Zoom = 100 '次のシートへ Next sheet '一番先頭のシートをアクティブ化 Sheets(1).Select End Sub |
このマクロを実行すると、全シートの拡大率を100%にすることが出来ます。
作成したマクロをアドインとして保存する
そのままマクロ形式であれば、「.xlsm」形式で保存しますが、アドインの場合は「.xlam」形式で保存します。
以下のような感じです。
作成したアドインをクイックアクセスツールバーに登録する
アドインの作成まで進んだら、ここからアドインを実際にExcelで有効に設定にします。
[開発]タブにある[Excelアドイン]というところをクリックすると、以下のようにアドインの一覧が出てきます。
先ほど登録したアドインが出てくると思うので、チェックを付けて”OK”を選択しましょう。これで作成したアドインが有効化されました。
有効化したアドインをサクッと使用できるようにしたいので、クイックアクセスツールバーに追加しましょう。
下記画像の赤丸のところをクリックし、[その他のコマンド]をクリックします。
そうすると、以下ような画面が出てくるので、[クイックアクセスツールバー]というところをクリックします。
そして、[コマンドの選択]をクリックし、[マクロ]を選択すると、先ほど作成したアドインの名前が出てきますので、選択して[追加]ボタンを押します。
そして、[OK]を押して画面を閉じると、以下画像の赤丸のように、何かマークが追加されていると思います。
これが今追加したアドインです。試しにクリックすると、マクロが動いて、全シートの拡大率が100%になっていると思います。
他のExcelを開いても使用できますので、これで上のマークをクリックするだけで、全シートの拡大率を100%にすることが出来るようになりました。
まとめ:効率的に仕事をこなしていこう!
意外と簡単に出来たと思います。
毎回全シートを100%にする、すごくめんどくさい作業から解放されて、ぼくはスッキリしました。
他にも、何かめんどくさい方法があったら、こんな感じで早くなる方法を探していきたいですね!