bepalen of in kolom een woord voorkomt

[ikselle]

Hallo,
In een kolom heb ik stukjes commentaar. Nu wil ik met VBA nagaan of het woord "bruid" voorkomt in de tekst.
Soms komt er ook in de tekst "bruidegom" voor en deze wil ik natuurlijk overslaan. Hoe kan ik dit doen ?
Bedankt voor jullie hulp !

 

[roeljongman]

door in je zoekstring een spatie op te nemen dus "bruid " immers zoek je alleen het woord bruid en zal na dat woord altijd een spatie staan daardoor zal bruidegom of bruidstaart geen resultaat opleveren.

 

[ikselle]

Bedankt roeljongman :thumb:, het leven kan toch zo simpel zijn. Sommigen zoeken het steeds moeilijker dan nodig is .

 

[emields]

En wat wil je met die bruid doen?

 

[AD1957]

Werkt niet altijd roeljongmans, emields.

De bloemen zijn voor de bruid. ????? Maar waar is de bruid?

 

[Enigmasmurf]

Het kan nog erger. Als er ergens vóór het woord 'bruid' nog een 'b' voorkomt (vooraan of binnenin een woord) zullen daar ook 5 karakters gekleurd worden.
Dat kan alvast opgelost worden door de code bij 'Knop1_Klikken' simpeler te schrijven

For Each it In Columns(5).SpecialCells(2)
    If InStr(it, "bruid ") Then
        it.Characters(InStr(it, "bruid "), 5).Font.Color = vbRed
    End If
Next

Voor de rest zal het een kwestie zijn van zich afvragen welke mogelijkheden kunnen verwacht worden, bv. bruid / bruid, / bruid. / bruid? en deze in de code op te nemen.