VBA code stops working at 53rd column

[Euler271]

I have VBA code in Access that creates an Excel workbook and fills a worksheet based on values in Access tables. The code fills five columns per state. (I have a state table that lists all 51 states, including DC.) My code stops working with "Error 1004 Method of 'Range 'of object'_Worksheet' failed" message. It always stops working when trying to insert something in column "BA", for some reason. In other words, in works just fine for the first two alphabets (A->Z and AA->AZ) but mysteriously stops with the error message in column "BA".

Does anyone have a clue why this is happening? I really need this to work. Thanks.

 

[Norie]

Oops.

Yes, there was a missing closing parenthisis.

With xlWs
    .Range(.Cells(8, i + 4), .Cells(.Cells(xlWs.Rows.Count, 1).End(xlUp).Row, i + 4)).FormulaR1C1 = "=RC[-1]*RC[-2]"
End With