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

みたいな。

スポンサーリンク