Maximum criteria??

I have a spreadsheet that I cull data from based on this routine:

 
Dim i As Long
Dim iStart As Long
Dim iEnd As Long

iStart = 1
iEnd = Range("B65536").End(xlUp).Row

For i = iStart To iEnd
   If Range("B" & i).Value <> "Claude Mossian" And _
    Range("B" & i).Value <> "Dave Wester" And _
    Range("B" & i).Value <> "Elaine Ober" And _
    Range("B" & i).Value <> "Greg Trujillo" And _
    Range("B" & i).Value <> "House Account INDiana" And _
    Range("B" & i).Value <> "Jill Campbell" And _
    Range("B" & i).Value <> "Lana Compo" Then
    Range("B" & i).Value = ""
   End If
Next

Because I only want those sales reps indicated.

Recently someone asked me if I could take the same raw data set, and select mulitple customer ship to account #'s. (and all of the data that goes with them)
(there over 75 of them). Is there any easier way to write the macro code, and are there limitations to the number of selection criteria I can use in this routine?
And the ship to #'s are not in sequence, they're all over the place.

Mike.