Filter 3 criterias in 2003 using VBA?

[revenant]

Guys

I have 1 single column of data that I want to filter. However, I have 3 criteria hence I can't use the autofilter function.

Criteria 1: Contains Company
OR
Criteria 2: Contains @
OR
Criteria 3: Contains 8 digits

Columns("A:A").Select
Selection.AutoFilter Field:=1, Criteria1:="=*company*", Operator:=xlOr, _
Criteria1:="=*@*", Operator:=xlOr, Criteria1:="=*########*"

Thanks guys.

 

[Andrew Poulsom]

You would need to use Advanced Filter for that:

http://www.contextures.com/xladvfilter01_2003.html

 

[revenant]

You would need to use Advanced Filter for that:

http://www.contextures.com/xladvfilter01_2003.html

You mean I can't use vba?

 

[Weaver]

You could always use avanced filter via vba...

 

[revenant]

You could always use avanced filter via vba...

Thanks.

How do I let it filter out 8 specific digits? Using ="########" doesn't helps.

 

[Andrew Poulsom]

What 8 specific digits and where are they?

 

[revenant]

What 8 specific digits and where are they?

They are actually mobile number.

 

[Andrew Poulsom]

Can't you filter for begins with 07?

 

[revenant]

Can't you filter for begins with 07?

I managed to solve it using >80000000 (numbers here begin with 8 or 9).

I'm just wondering if there are any way to specifically search for number with x numbers of digits.

 

[Andrew Poulsom]

You could try:

=AND(LEN(A1)=8,ISNUMBER(A1))