Hi,
On my worksheet there is a line inserted everytime a name changes. Then it runs down the list and in each blank row it sums the cells above (from 1 cells up to the blank row before that noe contain the formula). I use this code below:-
I need to add to this code so that when the above has run it then looks looks at the sum value and if this is zero it cuts that line and all the rows within that formula onto another worksheet.
Thanks in Advance
Blunder
On my worksheet there is a line inserted everytime a name changes. Then it runs down the list and in each blank row it sums the cells above (from 1 cells up to the blank row before that noe contain the formula). I use this code below:-
Code:
For Each rngArea In Columns(11).SpecialCells(xlCellTypeConstants, xlNumbers).Areas
With rngArea.Offset(rngArea.Rows.Count).Resize(1, 1)
FormulaR1C1 = "=SUM(" & rngArea.Address(1, 1, xlR1C1) & ")"
I need to add to this code so that when the above has run it then looks looks at the sum value and if this is zero it cuts that line and all the rows within that formula onto another worksheet.
Thanks in Advance
Blunder