søge med ubekendt

I VBa findes sammenligningsoperatoren "LIKE"

If myrange LIKE "Peter*" then
  ...
End If

"*" er et jokertegn

Hvis du vil have sammenligningen skal være sand for både store og små (peter og Peter og PeTeR og..), så skriv
Option Compare Text
i starten af vba-modulet

... eller

If instr(myrange,"peter") >0 then
...
end if,

men den tager også "petersen" med

Du kan evt. nøjes med
Avanceret Filter
Brugerdefineret
og skrive
*Peter*

jeg mener:

Du kan evt. nøjes med
Avanceret Filter
Brugerdefineret
og skrive
*Peter *  (husk mellemrum)

Hej tak for de hurtige svar hvis min søge linje ser sådan ud
" If LCase(OpslagsData5Bemanding(I, 4)) = LCase(Me.tx_Fornavn_BemandingsArk) Then" hvor kan jeg så indsætte jokertegnet?

Hej jeg har prøvet med denne sting

If LCase(OpslagsData5Bemanding(I, 4)) Like LCase(Me.tx_Fornavn_BemandingsArk & " " & "*")  Then
men så finder den kun dem der hedder mere end Peter

Du er på sporet -- men du skal ikke have et mellemrum før "*" (med mindre personerne altid har mere end ét navn), så der skal stå:
If LCase(OpslagsData5Bemanding(I, 4)) Like LCase(Me.tx_Fornavn_BemandingsArk & "*") 

(og det der står til venstre for "Like" skal være "Peter" i eksemplet)

Bemærk i øvrigt, at hvis du har en person der hedder Le, og du søger på denne, vil den også finde Lene og Lesley, hvis de findes.

HEj det var lige det der skulle til så mange tak:))