Summing Quarters
are you wanting a macro?
Sub Macro1()
'
' Macro1 Macro
'
'
Range("A2").Select
ActiveCell.FormulaR1C1 = "=SUM(R[-1]C:R[-1]C[2])"
Range("B2").Select
ActiveCell.FormulaR1C1 = "=SUM(R[-1]C[2]:R[-1]C[4])"
Range("C2").Select
ActiveCell.FormulaR1C1 = "=SUM(R[-1]C[4]:R[-1]C[6])"
Range("D2").Select
ActiveCell.FormulaR1C1 = "=SUM(R[-1]C[6]:R[-1]C[8])"
Range("D3").Select
End Sub
"Jeff" wrote:
Thanks, David, but I'm trying to find a way to automate this. Assuming data
for the first year is in A1..L1, I want quarterly totals in A2..D2.
"David" wrote:
Assuming data is in row 2
=sum(a2:c2), =sum(d2:f2) and =sum(g2:i2) formulas in
Column D, Column E, Column F
"Jeff" wrote:
Can anyone devise a formula to summarize monthly data by adding each three
months? That is, I need to add columns A-C, D-F, G-I, etc. I've been doing
this manually, but there must be a better way. Thanks.
|