OMathFunction.ScrSubSup (Word)
Returns an OMathScrSubSup object that represents a mathematical subscript-superscript object that consists of a base, a subscript, and a superscript.
Dim omf As OMathFunction: Set omf =
Dim omsScrSubSup As OMathScrSubSup
Set omsScrSubSup = omf.ScrSubSup