I am using the following macros to look down column A looking for "T" and then wish to place some formulas in Columns F&G where "T" is found. The problem lies in the Total macro, I do not know what commands to use, as the ones I have do not work.
Hope someone can help.
Sub MonthlySummary()
Dim i As Long
For i = Cells(Rows.Count, "C").End(xlUp).Row To 1 Step -1
If Cells(i, "A").Value = "T" _
Then Call Total
Next i
End Sub
Sub Total()
Cells(i, "F").FormulaR1C1 = "=+RC[-4]+RC[-3]"
Cells(i, "G").FormulaR1C1 = "=+RC[-5]+RC[-4]"
End Sub
Hope someone can help.
Sub MonthlySummary()
Dim i As Long
For i = Cells(Rows.Count, "C").End(xlUp).Row To 1 Step -1
If Cells(i, "A").Value = "T" _
Then Call Total
Next i
End Sub
Sub Total()
Cells(i, "F").FormulaR1C1 = "=+RC[-4]+RC[-3]"
Cells(i, "G").FormulaR1C1 = "=+RC[-5]+RC[-4]"
End Sub