選択範囲
選択した部分は Selection で求めることが出来ます。Selection.Count で何個のセルを選択しているかが分かります。
Selection.Cells(1)が選択している最初のセル、Selection.Cells(Selection.Count)が最後のセルです。
これらのセルのRowプロパティに行番号が、Columnに列番号が入ります。
行番号
gyo = Selection.Cells(1).Row '最初の行 gyo = Selection.Cells(Selection.Count).Row '最後の行
列番号
retu = Selection.Cells(1).Column '最初の列 retu = Selection.Cells(Selection.Count).Column '最後の列