Change array to include new cells

Hi, Try:-

Please Login or Register  to view this content.

Regards Mick

You actually need this done IN column G? Or is column G your representation of what you want to happen in column E?

We want the row inserted when the value in column E changes?

Is the word "SUMMARY" supposed to be entered, or a SUM() formula for that section? Or "Summary" in column E and a SUM() formula in column F?

1)Column G in the post is what I would like to happen IN column G
2)"Summary" should be entered when value in Column E changes
3)"Summary" actually entered, not a summation.

Why column C?

Sub MG14Aug52
Dim Last As Integer, Del As Long
Dim Rng As Range, Dn As Range
Set Rng = Range(Range("c1"), Range("c" & Rows.Count).End(xlUp))
For Del = Rng.Count To 2 Step -1
With Range("c" & Del)
If Not .Value = .Offset(-1).Value Then
.Insert
.Offset(-1).Value = "Summary"
End If
End With
Next Del
End Sub

MickG's solution seems to work, but I might have simplified my example a little too much. Each of the letters in the example corresponds to a number, so instead of the code placing a summary in between repeating letters, it needs to be placed in between non-repeating numbers that correspond to the letters. The letters determine the change but should not be placed in between the summaries.
Something similar to this:

Please Login or Register  to view this content.

Hi, Try this:-

Please Login or Register  to view this content.

Regards Mick