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

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

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

表

マクロ解説

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

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

マクロ


Sub カーソル位置のセル番号()

 If Selection.Information(wdWithInTable) = True Then
   MsgBox "行: " & Selection.Cells(1).RowIndex & vbCr & _
       "列: " & Selection.Cells(1).ColumnIndex
 Else
   MsgBox "表内にカーソルを置いて実行してください。"
   End
 End If

End Sub

トップへ戻る