Range(Selection, Selection.End(xlToRight)).Select
Dave,
Range(Selection, Cells(Selection.Row, 256).End(xlToLeft)).Select
But, if there are additional columns that you don't want that are to the right of column U then use
Intersect(Selection.EntireRow, _
Range(Selection.EntireColumn, Range("U:U").EntireColumn)).Select
Though there isn't any need to Select the range....
HTH,
Bernie
MS Excel MVP
"Dave Birley" wrote in message
...
This line of Code:
Range(Selection, Selection.End(xlToRight)).Select
..comes up a couple of Columns short. The reason is obvious, the first of
the two missing Columns (T) is empty, but the one to the right of it (U)is
not. As I am selecting multiple Rows at the same time, and intend to run this
macro on a number of WS, each of which may or may not be populated in the
cells of those last two columns -- and may even find columns R and S empty
on some WS, but the number of Rows in each WS will vary, how do I tell the
Macro to Select the Columns I really want?
--
Dave
Temping with Staffmark
in Rock Hill, SC
|