Range.SetPhonetic (Excel)
Erstellt phonetische Objekte für alle Zellen im angegebenen Bereich.
Alle vorhandenen phonetischen Objekte im angegebenen Zeitraum werden durch die neuen Objekte, die Sie mithilfe dieser Methode hinzufügen, automatisch überschrieben (gelöscht).
ActiveSheet.Range("A1:A10").SetPhonetic