How about...

Sub ReturnLastCellAddress()
Dim strRange As Range
Set strRange = Range("$2:$4")
MsgBox strRange(strRange.Count).Address
End Sub


--
Regards,
Rocky McKinley


"raj" wrote in message
...
Hello,

Does anyone know the easiest way (i.e. most
efficient/fewest code lines/fastest code, etc.) to select
the S.E. corner or bottom right cell address from a single
area range address stored in a variable?

For example, if my variable contains: strRange = "$2:$4"
My function would return the string: "$IV$4"

OR,

If my variable contains: strRange = "$BA457:FJ1057"
My function would return the string: "$FJ$1057"

Your example code would be most appreciated. Thanks much
for your assistance.