For a variety of reasons I frequently have to convert long columns of text
into text for which the first three characters are in upper case and the rest
of the text string is in lower case.

Example: "Rastafarian" would have to be converted to "RAStafarian".

This is easy enough to do with a formula; i.e.,
=CONCATENATE(UPPER(LEFT(D14,3)),MID(D14,4,1000)) however I would like to
create a macro and attach it to a button so that I can convert these text
strings in one click.

How would I express the above formula in VBA syntax?

Thanks,

Dave
--
Brevity is the soul of wit.