【VBA】全シートの選択セルをセルA1に合わせるマクロ

Excelを仕事で使用していると、保存する際に全シートの選択セルをA1(左上)に合わせたいと思う事があります。

そんな時はマクロを組んでしまえば一発解決です。Excelで自動化したければマクロ一択です。

という事で今回は、全シートの選択セルをA1(左上)に合わせるマクロについて解説したいと思います。

全シートの選択セルをセルA1に合わせるマクロ

早速ソースコードを記載しておきます。

使用方法

上記のソースコードを標準モジュールに記載してください。あとは実行するだけです。アドインとして登録するのがおすすめですが、この記事内では細かい事は記載しません。

あくまで、マクロの解説に留めたいと思います。

解説

セルA1を選択している箇所は、6行目の

の部分です。

問題なのは7・8行目の部分です。

この記述がないと、セルA1を選択してもスクロールが初期状態に戻りません。ですので、スクロールが下の方にあるのなら、スクロールを一番上に上げてあげる必要があるわけです。

まとめ

ソースコード自体は簡単ですね。

普段セルA1を手動で選択している場合も多いかと思いますが、たったこれだけの記述ですべて自動化できるわけです。知っているかどうかの問題ですし、意外と簡単な事は多いです。特にマクロは言語としても簡単な部類に入ると思いますので。