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
みたいな。
スポンサーリンク