VBA エクセルマクロ

VBA カーソルの位置


VBA でサクサクっと書いてると、処理後にカーソルの位置をもどしたいときってあるぉ。
マウスイベントで発生した処理なら target が来てるけど、そうじゃない時は、アクティブセルを使う。

Dim nRow
Dim nCol
Dim pSheet

nRow = ActiveCell.Row nCol = ActiveCell.Column
set pSheet = Active.Sheet

処理

pSheet.Cells(nRow,nCol).select
Exit sub

みたいな。

スポンサーリンク

関連記事一覧