Can anyone help?

I want to be able to a macro / function that reads a cell and converts the
number to words, e.g. 111 = One Hundred and Eleven. 57 = Fifty seven

Sounds straight forward but I'm coming unstuck.

Thanks