This is probably a very simple formula but I'm having trouble with a search part.

I would like to offset the cells in a particular column "D" which have the term "USA" in them one cell to the right.
Not all the cells in this column contain this term and I don't want any other columns affected.


With what I have searched for so far it will start with something like
ActiveSheet.Range("D")
And the last part of the formula will most be:
Selection.Offset(0, 1)

Thanks for the help.