Filter dmv textbox

[ZZ1]

Ik heb al eens een vraag gesteld over het filteren met een textbox...
Tot op heden heb ik deze code nooit toegepast.
Graag zou ik dit willen doen maar... Zoals gewoonlijk loop je tegen fouten aan.
Deze zou ik graag willen oplossen, maar hoe...??

Wie kan mij raad geven over de code en weet de oplossing waarom ik fouten blij houden.

Alleen kan ik het voorbeeld bestandje niet toesturen omdat het bestand groter is dan 100 kb.
De volgende code gebruik ik:

Private Sub TextBox1_Change()
If TextBox1 = "" Then
    Selection.AutoFilter field:=5
Else
    Selection.AutoFilter field:=5, Criteria1:=TextBox1.Value, Operator:=xlAnd
End If
End Sub

Iemand die me eventueel wil helpen moet het even melden, zodat ik het bestandje toe kan sturen.


Hoor graag van julllie!

 

[Hoornvan]

ZZ1,

Je zou het bestandje b.v.b. kunnen inpakken en kijken of het dan onder de 100 KB is.

 

[ZZ1]

Dit had ik al geprobeerd...
Maar toch bleef hij groter als 100 kb, 156 kb xD!

Kan ik hem eventueel naar u toesturen?


Alvast bedankt!

 

[Hoornvan]

Dit had ik al geprobeerd...
Maar toch bleef hij groter als 100 kb, 156 kb xD!

Kun je niet wat vanaf halen zodat hij kleiner word, of een voorbeeld zonder gevoelige info.

Het is een macro voor een Userform.
Als je in de TextBox een letter in voert zal hij op die letter filteren.

Zie het voorbeeld.

 

[ZZ1]

Bedankt voor je reactie!

Ik heb je bestandje gekeken en gecheckt.
Of ik doe iets verkeerd dus zal hem morgen proberen te plaatsen het voorbeeld bestandje.

Alleen zit er ook verschil tussen tekst en getal?
Value geeft toch aan dat je hem ook kunt gebruiken voor getallen..


Hoor graag een oplossing

 

[Hoornvan]

ZZ1,

Ja je kunt hem ook voor getallen gebruiken.

Ik heb nog 1,5 jaar gewoont in Leeuwarden van 1963 tot 1965

 

[ZZ1]

Aha dus ook een klein beetje een fries

Ik kwam erachter dat er nogal wat gegevens in het excel bestand stonden...
Hierbij het voorbeeldbestandje.
Ik heb 3 verschillende zoek opties ingevoegd maar het werkt niet bij mij...

Hoop dat je een antwoord hebt waarom dit zo is.

 

[Hoornvan]

ZZ1,

Aha dus ook een klein beetje een fries

Nou dat niet echt, was werkzaam op de vliegbasis. (verplicht)

Hier is je file en hoop dat dit is wat je bedoeld.

Nu maar hopen dat de meester snb geen schrijffout vind.

 

[ZZ1]

Hallo,

Ik heb je code gebruik, en het werkt nu perfect !
Geweldig !:d