【Excel】機能さえ知ってたら秒で終わる作業⑥【全シートA1選択】

【機能さえ知ってたら】シリーズ6作目。

研修で「提出前は全シートA1セルを選択する」ように言われた新人君。
部長、霊夢、魔理沙それぞれのやり方から何か学びがあると嬉しいです。

マクロでもできるけど…それってマクロじゃなきゃダメ？
Excelそもそもの機能できないの？ってお話。
マクロ初心者がよくやっちゃうやつ。。

あ、ここだけの話…
A1セルって実は左上の方にあるんですよね。

なんやこのふざけた動画。

動画の概要
全シートA1セルを選択するマクロ
あとがたり

動画の概要

部長　　「A1セルがどこにあるか予測」すれば効率化できるぞ！
魔理沙　「ショートカットキー」で効率化できます！
霊夢　　「マクロ」で一瞬だよ！
新人君　「あ…。マクロ使わなくてもっすね…」

ちなみに今回、「ページを移動」するショートカットキーだけ紹介してますが、
「A1セルを選択する」ショートカットキーもあります。(ctrl+home)
※PCによってはhomeキーがないやつもあるのではしょりました。

新人君

ちなみuぷ主が個人で使ってるPCは
homeボタンがないっす！

ブチョ

ちなみに俺の使ってるPCは
houseボタンまであるぞ！

新人君

なんやそのキー…

全シートA1セルを選択するマクロ

Sub 全シートA1セルを選択
    
    Dim i as Long
    For i = 1 to sheets.count
        sheets(i).Select
        range("A1").Select
    next i 

End Sub

Sheets(i).Range(“A1”).Selectとはできない(※条件あり)ので注意ですね。
1行でまとめたいなら Application.Gotoメソッドを使うとできたような気がしなくもない。

動画では”300シート”って指定したので、「Sheets.Count」の部分を「300」としてますが…
まあどっちゃでもいいかな。

あ、あと動画ではイミディエイトウィンドウでやってますね。
これもどっちゃでもいいです。

あとがたり

おはこんばんちは。uぷ主です。
【機能さえ知ってたら秒】シリーズの6作目です。

今回は「全シートA1セルを選択」する方法編でしたが…いかがだったでしょうか。
ぶっちゃけ、これについて皆さんの意見が気になるところ…

uぷ主は3つに分かれると思ってて、
「A1セルを選択するのはマナーでしょ」「選択しないと気が済まない」などの”きっちり”派。
「そんなんいちいちやる必要なくない？」「気にならない」などの”がさつ”派。
「ついつい癖でやっちゃうんだよねー」「あ～それアドインに仕込んでるから完全自動だけどね～」などの”自慢”派。

uぷ主が嫌いなのは言うまでもなく、自慢はです。

あ、そろそろコメント読みます。