Solved: How to add a text column to a dynamic range using a macro

[bananatang]

HI,

Need some help on this one please.

i need a macro that will insert the text "Off Roll" in column AA, Row 2 and all the way down to the last row inline with Column A.

Column A contains a unique no. that will alway be populated, so i would like to use this column to identify the last row.

Thanks

BT

[Bob Phillips]

LastRow = Range("A1").End(xlDown).Row
Range("AA2").Resize(LastRow-1).Value = "Off Roll"

[mdmackillop]

or

Range(Cells(2, 1), Cells(2, 1).End(xlDown)).Offset(, 26).Value = "Off Roll"

[bananatang]

Xld and mdmackillop that you both for your reply and vba code. Both work well.

Thanks very much.

BT