Excelで作業をしていると、特定のセルを画面の左上にぴったり表示したいという場面があります。
たとえば、「データ一覧の途中行へ瞬時に移動し、そこを基点に作業したい」といったケースです。
そのようなときに便利なのが、VBAの ScrollRow と ScrollColumn プロパティです。
この2つを組み合わせることで、任意のセルをウィンドウ左上に移動表示することが可能です。
基本コード:セルを画面左上に表示させる
Dim targetCell As Range
Set targetCell = Range("M30")
With ActiveWindow
.ScrollRow = targetCell.Row
.ScrollColumn = targetCell.Column
End With
コードの解説
| 行 | 内容 |
|---|---|
Range("M30") | 左上に表示させたいセルを指定します。例では M30 セルです。 |
.ScrollRow = targetCell.Row | 指定セルの行番号を画面の最上部行に設定します。 |
.ScrollColumn = targetCell.Column | 指定セルの列番号を画面の最左列に設定します。 |
このコードを実行すると、M30セルがちょうど画面の左上隅に表示される状態になります。
応用例:セルを表示しつつ選択状態にもしたい場合
Dim baseCell As Range
Set baseCell = Range("H20")
With ActiveWindow
.ScrollRow = baseCell.Row
.ScrollColumn = baseCell.Column
End With
baseCell.Select
このようにすれば、指定したセルを左上に表示した上で、そのセルを選択状態にすることも可能です。
注意点と補足
| 項目 | 内容 |
|---|---|
| 実行時に画面が移動する | スクロール操作が伴うため、ユーザーが作業中の場合は事前通知が望ましいです。 |
| 非表示セルには使えない | 指定したセルが非表示の場合、正しくスクロールされないことがあります。 |
| フリーズウィンドウに注意 | ウィンドウ枠が固定されている場合、思った位置にスクロールされないことがあります。 |
使用シーンの例
- 入力フォームの特定欄へ自動誘導
- データ一覧の中間位置へジャンプ
- エラーセルを画面左上に移動して強調
まとめ
| 目的 | コード |
|---|---|
| セルを左上に表示 | .ScrollRow = Range.Row と .ScrollColumn = Range.Column |
| 表示+選択もしたい | .Select を追加する |
| 応用範囲 | 検索後のセル移動、入力欄誘導など |
このように、ScrollRow と ScrollColumn を使えば、ユーザーが注目すべきセルを画面上に明確に表示することができます。
とくにフォーム制御やデータレビューの場面では、視認性の向上や作業効率化に大いに役立ちます。
副業から独立まで「稼げる」Webスキルを習得する(PR)
ここまで読んでいただきありがとうございます。 最後に宣伝をさせてください。
「副業を始めたいが、何から手をつければいいかわからない」「独学でスキルはついたが、収益化できていない」という悩みを持つ方には、マンツーマン指導のWebスクール**「メイカラ」**が適しています。
このスクールは、単に技術を教えるだけでなく、**「副業として具体的にどう稼ぐか」**という実務直結のノウハウ提供に特化している点が特徴です。
講師陣は、実際に「副業Webライターから1年で独立して月収100万円」を達成したプロや、現役で利益を出し続けているブロガーなど、確かな実績を持つプレイヤーのみで構成されています。そのため、机上の空論ではない、現場で通用する戦術を学ぶことができます。
副業に特化した強み
- 最短ルートの提示: 未経験からでも実績を出せるよう、マンツーマンで指導。
- AI活用の習得: 副業の時間対効果を最大化するための、正しいAI活用スキルも網羅。
- 案件獲得のチャンス: 運営がWebマーケティング会社であるため、実力次第で社内案件の紹介など、仕事に直結する可能性があります。
受講者の多くは、「在宅でできる仕事を探している」「副業を頑張りたい」という20代・30代・40代が中心です。
受講前には、講師による無料説明が行われます。無理な勧誘はなく、自分に合った副業スタイルやプランを相談できるため、まずは話を聞いてみることから始めてみてはいかがでしょうか。
