Bob Greenblatt said:
I do not think there is a short cut key. However, there is a clickable
button on the formatting palette.
Using Bob's suggestion you could make keyboard shortcuts by using
macros. Unfortunately, though, they won't work when in Edit mode:
Put these in regular code modules in your Personal Macro Workbook.
Public Sub MySuperscript()
Commandbars.FindControl(id:=57).Execute
End Sub
Public Sub MySubscript()
Commandbars.FindControl(id:=58).Execute
End Sub
In that workbook's ThisWorkbook code module, put
Private Sub Workbook_Open()
Application.OnKey "^+{UP}", "MySuperscript"
Application.OnKey "^+{DOWN}", "MySubscript"
End Sub
Close and reopen XL. Whenever you type CTRL-SHIFT-up-arrow, the selected
cell will have Superscript toggled, and CTRL-SHIFT-down-arrow will
toggle Subscript.