Start Property Example

This example returns the starting position of the second phonetic text string in the active cell.

ActiveCell.FormulaR1C1 = "toukyoutotoukyoutotoukyoutoshibuyakushibuyakushibuyakuyoyogiyoyogiyoyogi"
ActiveCell.Phonetics.Add Start:=1, Length:=3, Text:="toukyoutotoukyoutotoukyoutotoukyoutotoukyoutotoukyouto"
ActiveCell.Phonetics.Add Start:=4, Length:=3, Text:="shibuyakushibuyakushibuyakushibuyaku"
MsgBox ActiveCell.Phonetics(2).Start