Well, have you tried recording a macro that sets superscript and underlining?
You can choose Format, Font, then click Superscript.  For underline, try
Ctl-U.  The code that results might be your answer.

Cheers,

Lesley Regan