vba autofill creates run-time error 1004 when only one line exists

I'm using this vba code to copy/paste a formula down to the range of cells equivalent to column A. It works great with multiple lines, but when only one line exists I get a Run-time error 1004: Auto fill method of Range Class Failed message. What do I need to add (or correct) so it works on one line or multiple lines? I really appreciate your help!


Range("B2").Select
ActiveCell.FormulaR1C1 = "=+RC[2]&""CH"""
Selection.AutoFill Destination:=Range("B2:B" & Range("A" & Rows.Count).End(xlUp).Row)
Range(Selection, Selection.End(xlDown)).Select

Try

Please Login or Register  to view this content.

Yes, perfect! Thank you for the quick response!