This can be done using a shortcut set to run as a service. It would be great to have it as a PopClip extension (optionally offering to reduce the point size as well).
Shortcut that I use, for reference: Apply Superscript/Subscript baseline treatment in Apple Mail compose window - Shortcuts - MacScripter