Phonetic object (Excel)
Contains information about a specific phonetic text string in a cell.
In Microsoft Excel 97, this object contained the formatting attributes for any phonetic text in the specified range.
Use Phonetics (index), where index is the index number of the phonetic text, to return a single Phonetic object.
The following example sets the first phonetic text string in the active cell to "フリガナ".
ActiveCell.Phonetics(1).Text = "フリガナ"
The Phonetic property of the Range object provides compatibility with earlier versions of Microsoft Excel. You should use Phonetics (index), where index is the index number of the phonetic text, to return a single Phonetic object. To demonstrate compatibility with earlier versions of Microsoft Excel, the following example adds Furigana characters to the range A1:C4. If you add Furigana characters to a range, a new Phonetic object is automatically created.
With Range("A1:C4").Phonetic .CharacterType = xlHiragana .Alignment = xlPhoneticAlignCenter .Font.Name = "MS P ゴシック" .Font.FontStyle = "標準" .Font.Size = 6 .Font.Strikethrough = False .Font.Underline = xlUnderlineStyleNone .Font.ColorIndex = xlAutomatic .Visible = True End With
Support and feedback
Have questions or feedback about Office VBA or this documentation? Please see Office VBA support and feedback for guidance about the ways you can receive support and provide feedback.