NameFarEast Property Example

This example displays the name of the Asian font applied to the selection.

MsgBox ActiveWindow.Selection.ShapeRange _
    .TextFrame.TextRange.Font.NameFarEast