Entering A1 Versus R1C1 in VBA : Cell Reference « Excel « VBA / Excel / Access / Word






Entering A1 Versus R1C1 in VBA

 
Sub A1Style()
    FinalRow = cells(Rows.count, 2).End(xlUp).row
    range("D4").Formula = "=B4*C4"
    range("F4").Formula = "=IF(E4,ROUND(D4*$B$1,2),0)"
    range("G4").Formula = "=F4+D4"
    range("D4").copy Destination:=range("D5:D" & FinalRow)
    range("F4:G4").copy Destination:=range("F5:G" & FinalRow)
    cells(FinalRow + 1, 1).value = "Total"
    cells(FinalRow + 1, 6).Formula = "=SUM(G4:G" & FinalRow & ")"
End Sub

 








Related examples in the same category

1.A1 Style References
2.Write a formula in the first 10 columns of row 21 in a worksheet that calculates the standard deviation of the values in rows 2 through 20
3.The Cells property is best suited for use with loops because it accepts numerical parameters representing the row and column indices in a worksheet
4.R1C1 Style
5.R1C1 Style References
6.Use loop to select cells