I would like to determine the maximum row and column references for a
selected range of cells,

Thanks,
Mike

One way:

Dim nLastRow As Long
Dim nLastCol As Long
With Selection
nLastRow = .Item(.Count).Row
nLastCol = .Item(.Count).Column
End With

In article ,
"Michael Allen" wrote:

I would like to determine the maximum row and column references for a
selected range of cells,

Michael,

If you mean you'd like to determine the last row and column in the selected
range then this would do it:

MsgBox "last row is" & Selection.Rows(Selection.Rows.Count).Row & vbCr & _
"last column is " &
Selection.Columns(Selection.Columns.Count).Column

If you just want the number of rows or columns in the selection, use the
parts inside the parens.

Michael Allen" wrote in message
. ..
I would like to determine the maximum row and column references for a
selected range of cells,

Thanks,
Mike