Hi All,

I have excel file. I am doing some filtering.

in Column A i have more than 1000 rows, with more than 100 unique
values.

I want to deselect some of the values, say 4 items. In excel i can do
it only two item with available option.

In VBA i got few codes which select the more than two item in the
filter.

here's my code

Dim Sht As Worksheet
Dim Crt(0 To 2) As String
Set Sht = ActiveSheet

Crt(0) = "A"
Crt(1) = "B"
Crt(2) = "C"

Sht.UsedRange.AutoFilter Field:=1, Criteria1:=Crt,
Operator:=xlFilterValues

The above code filters only "A", "B" & "C" values.....

My question : is there any option to deselect only "A", "B",
"C"....???

On Jun 25, 5:15*am, "fi.or.jp.de" wrote:
Hi All,

I have excel file. I am doing some filtering.

in Column A i have more than 1000 rows, with more than 100 unique
values.

I want to deselect some of the values, say 4 items. In excel i can do
it only two item with available option.

In VBA i got few codes which select the more than two item in the
filter.

here's my code

Dim Sht As Worksheet
Dim Crt(0 To 2) As String
Set Sht = ActiveSheet

Crt(0) = "A"
Crt(1) = "B"
Crt(2) = "C"

Sht.UsedRange.AutoFilter Field:=1, Criteria1:=Crt,
Operator:=xlFilterValues

The above code filters only "A", "B" & "C" values.....

My question : is there any option to deselect only "A", "B",
"C"....???
???
<

On Jun 25, 8:53*pm, Don Guillett wrote:
On Jun 25, 5:15*am, "fi.or.jp.de" wrote:







Hi All,

I have excel file. I am doing some filtering.

in Column A i have more than 1000 rows, with more than 100 unique
values.

I want to deselect some of the values, say 4 items. In excel i can do
it only two item with available option.

In VBA i got few codes which select the more than two item in the
filter.

here's my code

Dim Sht As Worksheet
Dim Crt(0 To 2) As String
Set Sht = ActiveSheet

Crt(0) = "A"
Crt(1) = "B"
Crt(2) = "C"

Sht.UsedRange.AutoFilter Field:=1, Criteria1:=Crt,
Operator:=xlFilterValues

The above code filters only "A", "B" & "C" values.....

My question : is there any option to deselect only "A", "B",
"C"....???

???
<


Hi Don, I didn't get your answer

I know the possible ways, using helper column ( input formula
=if(or(a2="A",a2="b",a2="c"),"Deselect","select" )
OR
I can use the Advance Filter with Criteria.

But i am looking for why i am not able input use "<" in my code to
get the desired result.

It happens that fi.or.jp.de formulated :
On Jun 25, 8:53*pm, Don Guillett wrote:
On Jun 25, 5:15*am, "fi.or.jp.de" wrote:







Hi All,

I have excel file. I am doing some filtering.
in Column A i have more than 1000 rows, with more than 100 unique
values.

I want to deselect some of the values, say 4 items. In excel i can do
it only two item with available option.
In VBA i got few codes which select the more than two item in the
filter.

here's my code

Dim Sht As Worksheet
Dim Crt(0 To 2) As String
Set Sht = ActiveSheet

Crt(0) = "A"
Crt(1) = "B"
Crt(2) = "C"

Sht.UsedRange.AutoFilter Field:=1, Criteria1:=Crt,
Operator:=xlFilterValues

The above code filters only "A", "B" & "C" values.....
My question : is there any option to deselect only "A", "B",
"C"....???

???
<


Hi Don, I didn't get your answer

I know the possible ways, using helper column ( input formula
=if(or(a2="A",a2="b",a2="c"),"Deselect","select" )
OR
I can use the Advance Filter with Criteria.

But i am looking for why i am not able input use "<" in my code to
get the desired result.

I believe Don is suggesting to use the 'NOT' operator as follows...

Crt(0) = "<A"
Crt(1) = "<B"
Crt(2) = "<C"

--
Garry

Free usenet access at http://www.eternal-september.org
ClassicVB Users Regroup! comp.lang.basic.visual.misc

On Jun 25, 11:21*pm, GS wrote:
It happens that fi.or.jp.de formulated :









On Jun 25, 8:53*pm, Don Guillett wrote:
On Jun 25, 5:15*am, "fi.or.jp.de" wrote:

Hi All,

I have excel file. I am doing some filtering.
in Column A i have more than 1000 rows, with more than 100 unique
values.

I want to deselect some of the values, say 4 items. In excel i can do
it only two item with available option.
In VBA i got few codes which select the more than two item in the
filter.

here's my code

Dim Sht As Worksheet
Dim Crt(0 To 2) As String
Set Sht = ActiveSheet

Crt(0) = "A"
Crt(1) = "B"
Crt(2) = "C"

Sht.UsedRange.AutoFilter Field:=1, Criteria1:=Crt,
Operator:=xlFilterValues

The above code filters only "A", "B" & "C" values.....
My question : is there any option to deselect only "A", "B",
"C"....???

???
<

Hi Don, I didn't get your answer

I know the possible ways, using helper column ( input formula
=if(or(a2="A",a2="b",a2="c"),"Deselect","select" )
OR
I can use the Advance Filter with Criteria.

But i am looking for why i am not able input use "<" in my code to
get the desired result.

I believe Don is suggesting to use the 'NOT' operator as follows...

* Crt(0) = "<A"
* Crt(1) = "<B"
* Crt(2) = "<C"

--
Garry

Free usenet access athttp://www.eternal-september.org
ClassicVB Users Regroup! comp.lang.basic.visual.misc


This doesn't work, any idea..

Crt(0) = "<A"
Crt(1) = "<B"
Crt(2) = "<C"