I have the following code, which I would like to expand. I would like the data to be filtered down to anything that starts with the letter F in column 113 and certain things that start with the letter V. I would like to expand upon this, to include a list of about 23 allowable criteria that start with V, but I am already running into roadblocks.
Any clue how to solve this?
Sub filter2() Dim Lastrow As Long Lastrow = ActiveSheet.Cells(Rows.Count, 1).End(xlUp).Row With ActiveSheet.Range("A1:EN" & Lastrow) If ActiveSheet.FilterMode Then .AutoFilter .AutoFilter Field:=113, Criteria1:=Array("F***"), Operator:=xlOr, Criteria2:=Array("VMMA", "VMMB", "VMMC, "VMME") End With End Sub
Moderator note: Please take a moment to review the rules regarding the use of code tags. I have added them for you this time, please use them in the future.