Excel 2007 : Alphabetize 4 letters in a single cell formula

I want to alphabetize a single cell sting like "HARD" to "ADHR" using a single cell formula. No VBA allowed.

I could do it if
Small({Code("H"),Code("A"),Code("R"),Code("D")},1)
would do what I wanted.

Any suggestions?

See attached for Alphabetizing 3 letter strings works and how I get stuck.

Perhaps you mean:

Please Login or Register  to view this content.

working with strings / concatenating etc in array form is not quite as trivial / flexible as is the case with numbers (unavoidable repetition etc)

edit:
the above is similar in concept to zbor's except it uses explicit in line array which avoids need for array entry (given we are working explicitly with 4 chars)

further late edit:
it is assumed no VBA extends to 3rd party .xla's like morefunc which would permit use of MCONCAT

Rather than add yet further late edits...

The point regards working with strings in this manner is that native CONCATENATE does not permit arrays (hence point re: MCONCAT).

Actually creating an array of chars listed A-Z is relatively trivial:

Please Login or Register  to view this content.

(obviously use of {1;2;3;4} is for demo purposes - this can be variable per length of string)

However, rather annoyingly there is no native function available that would permit you to re-join the items into a single string.