Excel VBA Find String in Cells

Is there a better method than a loop to run through a column of cells and checking if it contains a specific string? It just feels sloppy and though maybe there is some built in function of checking for a string in a range of cells

Of course, the Find/FindNext functions. Look it up in VBA help, there is a good example there.