Phonetics Property

Returns the Phonetics collection of the range. Read only Phonetics.

Example

This example displays all of the Phonetic objects in the active cell.

Set objPhon = ActiveCell.Phonetics
With objPhon
    For Each objPhonItem in objPhon
        MsgBox "Phonetic object: " & .Text
    Next
End With