Returns the Phonetics collection of the range. Read-only.
Syntax
expression.Phonetics
expression A variable that represents a Range object.
Example
This example displays all 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