Maybe something like this will help:

Const LeftCol = 3
Const RightCol = 10
Const NumRows = 30

Dim BottomRow As Long

BottomRow = Cells(Rows.Count, LeftCol).End(xlUp).Row
TopRow = BottomRow - NumRows + 1
Range(Cells(TopRow, LeftCol), Cells(BottomRow, RightCol)).Name = "SomeName"


On Sat, 6 Nov 2004 16:23:10 -0600, Chuckles123
wrote:


This is so easy in a spreadsheet. I want the macro to name a
two-dimensional range: the left-most column and the right-most column
are fixed; the bottom row is the last row of the spreadsheet (but, this
is a variable); the top row is a fixed number of rows above the bottom
row; and, there are some empty cells in the range.

How much harder can it be in a macro???

Thanks for a response.
Chuckles123