Format Total but not GRAND Total rows
Once a sheet is SubTotalled, need to put some formulas underneath each row
where Total occurs, but not under the Grand Total riow.
Note: The text in every total row contains a dash, ie "-" .
Tried the following, but it doesn't work ....
For Each c In Range("a2:a500")
If InStr((c.Value), "*-*Total") Then
c.Offset(1, 0).EntireRow.Insert Shift:=xlDown
Thanx in advance for any assistance.
- Mike
|