The code works for other colors, not green.
The only way I was able to fix this was to:
msgbox Selection.Font.Color
It returned 5287936.
Changed the Find to:
.Font.Color = 5287936


Works!
Not sure why it is like this.
Thank you Vivka!