MWE -

It would be delete. Autofilter can be called to find the part #(s) then delete.

Regioun - Thanks for your post also. I am trying to avoid using the UF if possible.

So far to this point - I have put a listbox & commandbutton on my sheet with the following code:


Private Sub CommandButton1_Click()
Dim i As Integer
Dim Msg As String
With ListBox1
  For i = 0 To .ListCount - 1
    If .Selected(i) = True Then
        If Msg = "" Then
          Msg = .List(i)
        Else
          Msg = Msg & ", " & .List(i)
        End If
    End If
  Next i
End With
With ActiveSheet
  .Range("AH" & .Rows.Count).End(xlUp). _
            Offset(1, 0).Value = Msg
End With
For i = 0 To ListBox1.ListCount - 1
   ListBox1.Selected(i) = False
Next
End Sub
I have change the listbox property to multi and pointed at the pivot table with the part numbers on it.

Thanks,

Kurt