OMathFunction.Bar (Word)

Returns an OMathBar object that represents the mathematical overbar for an object.

Dim omf As OMathFunction: Set omf =  
Dim ombBar As OMathBar
Set ombBar = omf.Bar