How to Highlight an Additional Column without Referencing Specific Cells

[CJBills]

I'm attempting to highlight an array plus an additional, empty (or partially empty) column to the right of the highlighted array.

I'm using "Range(Selection, Selection.End(xlToRight)).Select" to highlight the data.
[TABLE="width: 300"]
<TBODY>[TR]
[TD][/TD]
[TD]A
[/TD]
[TD]B
[/TD]
[TD]C
[/TD]
[/TR]
[TR]
[TD]1
[/TD]
[TD]Data
[/TD]
[TD]Data
[/TD]
[TD]No Data
[/TD]
[/TR]
[TR]
[TD]2
[/TD]
[TD]Data
[/TD]
[TD]Data
[/TD]
[TD]No Data
[/TD]
[/TR]
[TR]
[TD]3
[/TD]
[TD]No Data
[/TD]
[TD]No Data
[/TD]
[TD]No Data
[/TD]
[/TR]
</TBODY>[/TABLE]

The code must not include specified cells; each month the number of rows may change. Currently, the macro recorder auto-inputs the above code, then "Range(C1:C2).Select" in the following line.

Any suggestions?

I have tried "Range(Selection, Selection.End(xlToRight)).Offset(0, 1).Select". This seems to shift the entire highlighted array range, causing an omission of the first column, which needs to be included in the highlight.
[TABLE="width: 300"]
<TBODY>[TR]
[TD][/TD]
[TD]A
[/TD]
[TD]B
[/TD]
[TD]C
[/TD]
[/TR]
[TR]
[TD]1
[/TD]
[TD]Data
[/TD]
[TD]Data
[/TD]
[TD]No Data
[/TD]
[/TR]
[TR]
[TD]2
[/TD]
[TD]Data
[/TD]
[TD]Data
[/TD]
[TD]No Data
[/TD]
[/TR]
[TR]
[TD]3
[/TD]
[TD]No Data
[/TD]
[TD]No Data
[/TD]
[TD]No Data
[/TD]
[/TR]
</TBODY>[/TABLE]

Thank you in advance.

 

[JoeMo]

Try:

Range(Selection, Selection.End(xlToRight)).Resize(1, Range(Selection, _
        Selection.End(xlToRight)).Columns.Count + 1).Select

 

[CJBills]

JoeMo. Thank you kindly. Worked great! I will experiment with the Resize property.