How to quickly remove subtotals to create blank rows between different items

hi Folks
If I use sub-totals on a list and then want to quickly remove the sub-totals so I'm just left with my sorted list with a blank row where my subtotals used to be...any suggestions on how to do that elegantly? Thanks.
agwalshAsked:
Who is Participating?

[Webinar] Streamline your web hosting managementRegister Today

x
 
Rob HensonConnect With a Mentor Finance AnalystCommented:
Or you could do a Find & Replace:

Find:   =SUBTOTAL(*

Replace: leave blank

Thanks
Rob H
0
 
Rgonzo1971Connect With a Mentor Commented:
Hi,

pls try

Sub macro3()
For Each c In Range(Range("A2"), Range("A" & Rows.Count).End(xlUp))
    If c Like "*Total*" Then
        c.EntireRow.ClearContents
    End If
Next

Open in new window

Regards
0
 
agwalshAuthor Commented:
Excellent solutions both. I've given RobH the best solution because it's easier for the user...that's the only reason.
0
All Courses

From novice to tech pro — start learning today.