VBA code met Criteria

[novec]

Ik heb een stuk code waar bij het volgende in staat

Criteria1:="1"

Dit betekend dat in een bepaalde kolom van de tabel op waarde "1" wordt gefilterd.

hoe moet ik die code aanpassen als ik wil filteren op "1" en "46"

dank

Steven

 

[SjonR]

de door jou geplaatste code is wel heel summier, maar je zal met : Criteria2 en : Operator:=xlOr aan de slag moeten

 

[VenA]

Of met een array

 

[novec]

Het is gelukt met de volgende code

Criteria1:=Array("1", "46"), Operator:=xlFilterValues

Dank voor jullie hulp.

Groet

Steven