i am making a program that requires a filter and i have got this so far, bearing that in mind, it might be all wrong.
Any answer that will work will do me fine.
heres what i got so far:
dim filteredWords, fWord() as string
filteredWords = "word1;word2;word3"
fWord = split (filterWords, ";")
for 1 = 0 to UBound(fWord)
if InStr(1, Msg, fWord(i)) then
msgbox (instr(1, msg, fWord(i)))
replace msg, fWord(i), "$$$$"