Hi.
I need help.

I have a range that start with a cell that i have selected and ends in the
U3000, i need automaticaly select in that range all the rows and delete them.
How do i complete this expression ... It's something like the expression
below but dont know the final touch to work.
Please help.

Rows(ActiveCell.select :u3000).Select