'Enters the formula =SUM($G$12:$G$22) in the active cell: Sub fomula() ActiveCell.Formula = "=SUM($G$12:$G$22)" End Sub