Zoekfunctie

[gst]

Geacht forum,

Via een zoekfunctie probeer ik een ingevulde waarde van een excel sheet te vergeljiken met een waarde ingevuld in een textbox.
De waarde in de sheet bestaat uit 6 cijfers en ziet er als volgt uit, bijvoorbeeld: 000002

Wanneer ik in de textbox een 2 invul moet de waarde 000002 ook gevonden kunnen worden.
Helaas werkt dit niet in mijn toepassing.
Het werkt wel wanneer ik echt 000002 invul.
Maar beide zou mogelijk moeten zijn.

Heeft iemand een suggestie?
Voorbeeld bestand toegevoegd.

 

[HSV]

Zonder je hele code te bekijken.

Set c = .Find(What:=[COLOR=#FF0000]Format(zoekletter, "000000"), [/COLOR]LookIn:=xlValues, lookat:=xlWhole, MatchCase:=False, SearchFormat:=False)

 

[gst]

Harry,
Dank voor je reactie.
De voorgestelde regel in de module toegevoegd echter er veranderd niets.
Dus misschien nog een andere suggestie?

 

[HSV]

Dit had er nog bij gemoeten.

zoekletter = txtOrdernummerZoeken.Value

 

[gst]

Harry,

Je voorstel werkt!
Dank voor je meedenken.