Macro to filter multiple values in a column

Originally Posted by vcoolio

Hello jengesmeriz,

Here's one way around the array problem.

Place your three criteria in a column out of sight (say Column X and starting in row2) then try the following code:-

Sub Test()

Dim ar As Variant, lr As Long, ws As Worksheet

Set ws = Sheets("Test")

ar = ws.Range("X2", ws.Range("X" & ws.Rows.Count).End(xlUp))
lr = ws.Range("A" & Rows.Count).End(xlUp).Row

Application.ScreenUpdating = False

For i = 1 To UBound(ar)
    With ws.Range("I1:I" & lr - 1)
        .AutoFilter 1, ar(i, 1)
        .Offset(1, -6).Value = "Extra Air Con"
        .AutoFilter
    End With
Next i

Application.ScreenUpdating = True

End Sub

It assumes that your headings are in row1 with data starting in row2.

I hope that this helps.

Cheerio,
vcoolio.

Hi,
Thanks for the tips. I will try to follow your code. I'm working on several category not just "extra air con" and definitely the loop will surely help. By the way, what is "UBound"? How does it work? Thanks!

Ok jengesmeriz, I'll leave it with you.

This line

For i = 1 To UBound(ar)

in simple terms basically means the array is being searched from bottom (1) to top (UBound) or (LBound to UBound): the lower bounds to the upper bounds.

Cheerio,
vcoolio.

Originally Posted by vcoolio

Ok jengesmeriz, I'll leave it with you.

This line

For i = 1 To UBound(ar)

in simple terms basically means the array is being searched from bottom (1) to top (UBound) or (LBound to UBound): the lower bounds to the upper bounds.

Cheerio,
vcoolio.

It works! I just noticed that the loop works for more than one criteria. Thank you so much. Appreciate the help!

Rule 08: Cross-posting Without Telling Us

Your post does not comply with Rule 8 of our Forum RULES. Do not cross-post your question on multiple forums without telling us about your threads on other forums.

Post a link to any other forums where you have asked the same question. If you have fewer than 10 posts here, you will not be able to post a link, but you must still tell us where else you have asked the question.

Cross-posting is when you post the same question in other forums on the web. The last thing you want to do is waste people's time working on an issue you have already resolved elsewhere. We prefer that you not cross-post at all, but if you do (and it's unlikely to go unnoticed), you MUST provide a link (copy the url from the address bar in your browser) to the cross-post.

Expect cross-posted questions without a link to be closed and a message will be posted by the moderator explaining why. We are here to help so help us to help you!

Read this to understand why we ask you to do this, and then please edit your first post to include links to any and all cross-posts in any other forums (not just this site).

If you have less than 10 posts, do not try to copy and paste the link. Instead, type the link out in your thread.

No further help to be offered, please, until the OP has complied with this request.

Hi,

My apology. This is surely noted. Thanks for the guidance.

You're welcome.
Glad that I could help.

Cheerio,
vcoolio.