Use VBA to enter formulas in cells in the VBA research loop

Iamlaosong

Looking at a simple loop program, after VBA reads the data from the database, you need to enter a summation formula in the last cell:

<span style= "FONT-SIZE:14PX;" >lineno = [A65536]. End (Xlup). Rowfor i = 3 to Lineno    Cells (i, 9). FORMULAR1C1 = "=rc[-3]+rc[-2]+rc[-1]" Next i</span>

The formula means cells (i, 9) = Cells (I, 6) + cells (i,7) +cells (I, 8), where rc[-3] represents the formula in the same row The first 3 columns of the cell.

How do I represent the first 3 rows in the same column? Very simple, with r[-3]c on it. And so on, the same row after three columns is rc[3], the current cell diagonal diagonally is r[-1]c[-1], the back diagonal is r[1]c[1] ...

Use VBA to enter formulas in cells in the VBA research loop