selecting data

[Darron Ross]

I'm selecting some data with a macro that has some blanks
within the data. I'm using:

Range(Selection, Selection.End(xlDown)).Select

to select the cells below my current activecell. However
when I go to select cell to the right of my current
activecell using:

Range(Selection, Selection.End(xlToRight)).Select

It only selects part of the data. It stops right before a
blank cell and doesn't continue. This command is doing
what it should but I need to be able to select everything
to the right. I would be very happy if the code selected
all the way to IV. Just to insure I’m getting everything.

Thanks for your time and Help.
Darron

 

[Ron de Bruin]

Range(ActiveCell, Cells(ActiveCell.row, Columns.Count).End(xlToLeft)).Select

Try this

Range(Selection, Selection.End(xlDown)).Select

this will also stop on the first blank cell?