【VBAリファレンス|実務向け】作業効率が劇的に変わる!「選択範囲の移動」を極めるショートカット術

スポンサーリンク

導入

皆さんは、データ入力や集計を行う際、マウスで何度もセルをクリックしていませんか?「選択した範囲内で、アクティブセルを効率よく移動させる」。実は、この操作一つで、日々の事務作業のスピードは驚くほど変わります。今回は、マウスに手を伸ばす時間をゼロにする、実務に直結するショートカット術を解説します。

基礎知識

Excelにおいて「選択範囲」とは、ユーザーがマウスやキーボードで囲ったセルの領域を指します。通常、データ範囲を選択した後、Enterキーを押すと「下のセル」へ移動しますが、これでは範囲の右端や上端に行きたい時に不便です。
特にVBAを扱う方であれば、コードを書く際のデバッグやデータの確認時、あるいは大量のセル操作を伴うマクロ作成の際にも、これらのショートカットを身体に覚え込ませておくことで、操作の迷いがなくなります。

実装/解決策

実務で特に役立つのは、以下の3つのショートカットです。

1. 選択範囲の四隅を巡回する:[Ctrl] + [.](ドット)
範囲選択をした状態でこのキーを押すと、アクティブセルが「左上→右上→右下→左下」と順番に移動します。入力すべきセルが範囲の端にある場合に非常に強力です。

2. 飛び飛びの選択範囲を移動する:[Alt] + [Ctrl] + [→] または [←]
[Ctrl]キーを押しながら離れたセルを複数選択した場合、通常のTabやEnterキーでは移動が難しいことがあります。このショートカットを使えば、選択した順序に従ってアクティブセルをスムーズに切り替えることができます。

サンプルプログラム

ショートカットを覚えることは重要ですが、VBAで「選択範囲を自動で巡回させる」仕組みを作っておくと、自動処理の際にも応用が利きます。以下は、選択範囲の四隅を自動でアクティブにするサンプルです。

Sub MoveToCorners()
‘ 選択範囲がない場合は終了
If TypeName(Selection) <> “Range” Then Exit Sub

Dim rng As Range
Set rng = Selection

‘ 選択範囲の左上セルをアクティブにする
rng.Cells(1, 1).Activate
MsgBox “左上に移動しました”

‘ 選択範囲の右上セルをアクティブにする
rng.Cells(1, rng.Columns.Count).Activate
MsgBox “右上に移動しました”

‘ 選択範囲の右下セルをアクティブにする
rng.Cells(rng.Rows.Count, rng.Columns.Count).Activate
MsgBox “右下に移動しました”

‘ 選択範囲の左下セルをアクティブにする
rng.Cells(rng.Rows.Count, 1).Activate
MsgBox “左下に移動しました”
End Sub

応用・注意点

・Mac版Excelをご利用の方へ:Macでは[Alt]キーの代わりに[option]キーを使用します。環境が変わっても操作感を変えないことが、プロのスキル維持のコツです。
・注意点:[Ctrl] + [.] は、テンキーの[.]では反応しない場合があります。キーボード中央の[.]を使用するようにしてください。
・現場での活用:もし「入力箇所が決まっている」フォームのようなシートを作成する場合、あらかじめ保護をかけて「編集可能セル」のみを選択できるようにしておくと、このショートカットとTabキーを組み合わせるだけで、爆速でデータ入力が完了します。ぜひ試してみてください。

タイトルとURLをコピーしました