Superscript Vba

I have a scheduling spreadsheet that I designed for excel. It uses numbers as text and vlookup values instead of calculating actual time (its easier and saves space). I want it to look aesthetically pleasing:

630-230 (that is six-thirty until two-thirty)
7-315 (that is 7 o'clock until three-fifteen)

should look like this:

630- 230
7 - 315

How should the code be written so that if I write a string of text "xxx-xxx or x-xxx" the right parts get superscripted automatically.

notice that the first example has 3 digits before the hyphen and the second example has 1 digit before the hyphen. I need the vba code to work no matter which example is used.