If all you want to do is select 2500 rows buy clicking on a cell, then the
following will do.

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
Range("A" & ActiveCell.Row, "A" & ActiveCell.Row + 2499).EntireRow.Select
End Sub

This will select the current row and the following 2499 (2500 in total).

It's not a lot of use as it stands and clicking elsewhere in the sheet will
automatically change the selection. It's not clear from your post exactly
what you need to do, except to subject lots of unfortunates to junk mail :-)

--
Ian
--
"lilleke" wrote in message
...
work with Excel 2000 - direct mail databases - I would like to be able to
start on any row I choose and have a macro to choose the very next 2500
rows.
Is this possible?
--
claudia