Selection.CreateAutoTextEntry (Word)

Adiciona um novo objeto AutoTextEntry à coleção AutoTextEntries , com base na seleção atual.

CreateAutoTextEntry (Name, StyleName)

Selection.CreateAutoTextEntry "handdel", _ 
 "Mailing Instructions"

Arguments

O seguinte argumento é opcional

Name (String) - O texto que o usuário deve digitar para chamar a nova entrada de AutoTexto.

StyleName (String) - A categoria na qual a nova entrada de AutoTexto será listada no menu AutoTexto.