Ciao a tutti
utilizzo uno script che mi restituisce tutti i record e i relativi campi dove sono presenti una o più parole di una ricerca.
al momento mi evdenzia in grassetto la parola chiave trovata all'interno del testo restituito
ma poichè spesso il testo è molto lungo sono costretto a tagliarlo e quindi tagliare anche le parole chiavi

chi mi può aiutare nel fare in modo che possa inserire solo gli stralci che contengono le parole chiavi?

esempio:
Testo in cui cercare:
"Pippo cerca ma non trova la famosa lampada di aladino forse perche ormai essa è persa in fondo al mare e nessuno li la puo trovare chissa se mai cerrchera di sperare ma la fortuna si sa aiuta gli audaci"

Parole chiavi:
famosa nessuno

risultato:
famosa lampada di aladino... nessuno li la puo trovare chissa...

al momento evidenzio le parole trovate così:
strSearch="parole da cercare"
description"testo in cui cercare"
min=3 'cartteri minimi
arrRicerca = split(strSearch)
for each item1 in arrRicerca
if len(item1) > min then
description = replace(description,item1,"<font color='red'>" & item1 & "</font>",1,-1,vbTextCompare)
else
end if
next
description = description

grazie x l'aiuto