【Word VBA】カーソル位置のセル番号を取得するWordマクロ

2011年9月18日

, ,

ただいま、表を使ったマクロをつくっています。

現在のカーソル位置のセル番号を取得するマクロです。

表

マクロ解説

現在セルを特定するためには、Selection.Cells(1)を用います。

このオブジェクトに対して、RowIndexとColumnIndexというプロパティにて値を取得しています。

マクロ

1
2
3
4
5
6
7
8
9
10
11
Sub カーソル位置のセル番号()
 
　If Selection.Information(wdWithInTable) = True Then
　　　MsgBox "行： " & Selection.Cells(1).RowIndex & vbCr & _
　　　　　　　"列： " & Selection.Cells(1).ColumnIndex
　Else
　　　MsgBox "表内にカーソルを置いて実行してください。"
　　　End
　End If
 
End Sub

-コード
-, ,

S