Hello all,

I appreciate everyone who has helped me thus far, you are a great group.

I have the following code that I'm trying to tweak just a bit.

I would like to additionally have the macro search and remove duplicates in Column "F" but exclude the text that says "MCC"

Thanks for any help you can provide.

jolivanes has gotten me this far. POST

Sub Maybe()
Dim lr As Long, lc As Long, i As Long
Dim ar As Range
lr = Range("B" & Rows.Count).End(xlUp).Row
lc = Cells(6, Columns.Count).End(xlToLeft).Column
Application.ScreenUpdating = False
    For i = lr + 1 To 6 Step -1
        If Cells(i, 2).Value <> Cells(i - 1, 2) Then
        Cells(i, 1).EntireRow.Insert
            With Range("B" & i)
                .Resize(, lc - 1).Interior.Color = vbBlack
                .EntireRow.RowHeight = 4
            End With
        End If
    Next i

    For Each ar In Range("B7:B" & Cells(Rows.Count, 2).End(xlUp).Row).SpecialCells(2).Areas
        If ar.Rows.Count > 1 Then ar.Cells(1).Offset(1).Resize(ar.Rows.Count - 1, 3).ClearContents
    Next ar
    
Application.ScreenUpdating = True
    
End Sub