VBA - Excel delete rows not matching criteria

I have a BOM i exported out to excel. I need to delete all rows not containing my multipal partial criteria.

Basically i want to delete any rows NOT containing "-D" "-S" "-M" "RVS-" or "RVD-"....all other rows need to go.

I tried using auto-filter, but that only allow 2 or 3 criteria...i most likely will be adding to the "keep" list...so that wont work i beleive

SolidworksApi macros