Select case to check string array

In the attached workbook, upon clicking the button, a userform will appear, in which the user is to select what types of reads they want to keep - these get put into the listbox, and then into an array of strings (upon clicking Accept).

I then want to have the macro loop through each cell in column C and check the value against the codes stored in the array - this is where i have the select case.

Is there a way of having this case work without having to list each separate element of the array - sel(0), sel(1), sel(2), etc.

This goes inside your "For Each aCell In rngA" loop in place of your "Select Case".
I've set Ctr as a Byte assuming that Sel won't have more than 255 elements. If it does you'll haev to change Ctr to an Integer.

Please Login or Register  to view this content.