'Declaration
Function GetExtendedSelection( _
ByVal As Integer, _
ByVal column As Integer _
) As CellRange
'使用法
Dim instance As IQuerySelection
Dim row As Integer
Dim column As Integer
Dim value As CellRange
value = instance.GetExtendedSelection(row, column)