Mike wrote:
My
problem is that I want this to go to the last cell THAT
HAS DATA. There are several rows below this last cell
that are somehow recognized as being part of the range.
Is there either a way to delete the rows or to instruct
the macro to go to the last cell with data?

Range(Selection, ActiveCell.SpecialCells
(xlLastCell)).Select


Try:

Range(Selection, ActiveSheet.UsedRange.SpecialCells
(xlLastCell)).Select

Bill Manville
MVP - Microsoft Excel, Oxford, England
No email replies please - reply in newsgroup