What to skip if contains certain text strings

I have a simple issue with searching through a cell's text to see if it has one of the following words: Total, Income, Made or Earned. The following function in my VBA code should if it finds any of these strings skip over the "Then". I uses "UCase" to make it case insensitive plus put a space and the beginning and end of the cell. I want to find the whole word.

the cells contain:

Total Expense
Net Ordinary Income
7010 · Interest Income
Total Other Income
Net Other Income

Please Login or Register  to view this content.

Am I missing something here?

Does this help?

Please Login or Register  to view this content.

Originally Posted by JOHN H. DAVIS

Does this help?

Please Login or Register  to view this content.

I believe this will work, but it has to be case insensitive and the word (string) has to stand as a separate word.
But do you see any reason my code does not work?

Originally Posted by Bobbbo

I believe this will work, but it has to be case insensitive and the word (string) has to stand as a separate word.
But do you see any reason my code does not work?

it turns out my logic was inverted. I needed to find that string then skip over the "DO SOMETHING"

Please Login or Register  to view this content.

Thanks again for the help!