Objeto AutoTextEntry (Word)
Representa un único elemento de Autotexto. El objeto AutoTextEntry es un miembro de la colección AutoTextEntries. La colección AutoTextEntries contiene todos los elementos de Autotexto de la plantilla especificada. Las entradas se enumeran en la ficha Autotexto en el cuadro de diálogo Autocorrección.
Use AutoTextEntries (index), donde index es el nombre de entrada de Autotexto o el número de índice, para devolver un único objeto AutoTextEntry . Deben coincidir exactamente con la ortografía (pero no necesariamente las mayúsculas y minúsculas) del nombre, como se muestra en la ficha Autotexto en el cuadro de diálogo Autocorrección. El ejemplo siguiente establece el valor de un elemento de Autotexto existente denominado "cName".
NormalTemplate.AutoTextEntries("cName").Value = _
"The Johnson Company"
En el ejemplo siguiente se muestra el nombre y el valor del primer elemento de Autotexto de la plantilla adjunta al documento activo.
Set myTemplate = ActiveDocument.AttachedTemplate
MsgBox "Name = " & myTemplate.AutoTextEntries(1).Name & vbCr _
& "Value " & myTemplate.AutoTextEntries(1).Value
En el ejemplo siguiente se inserta el elemento global de Autotexto denominado "TheWorld" en el punto de inserción.
Selection.Collapse Direction:=wdCollapseEnd
NormalTemplate.AutoTextEntries("TheWorld").Insert _
Where:=Selection.Range
Utilice el método Add para agregar un objeto AutoTextEntry a la colección AutoTextEntries. En el siguiente ejemplo se agrega un elemento de Autotexto denominado "Blue" basado en el texto de la selección.
NormalTemplate.AutoTextEntries.Add Name:="Blue", _
Range:=Selection.Range
¿Tiene preguntas o comentarios sobre VBA para Office o esta documentación? Vea Soporte técnico y comentarios sobre VBA para Office para obtener ayuda sobre las formas en las que puede recibir soporte técnico y enviar comentarios.