Método TextRange.InsertAfter (PowerPoint)

Anexa una cadena al final del intervalo de texto especificado. Devuelve un objeto TextRange que representa el texto anexado. Si se utiliza sin argumento, este método devuelve una cadena de longitud cero al final del intervalo especificado.

Sintaxis

expresión. InsertAfter( _NewText_ )

Expresión Variable que representa un objeto TextRange .

Parameters

Nombre Obligatorio/opcional Tipo de datos Descripción
NewText Opcional String Texto que se va a insertar. El valor predeterminado es una cadena vacía.

Ejemplo:

Este ejemplo agrega la cadena ": Test version" al final del título de la diapositiva número uno de la presentación activa.

With Application.ActivePresentation.Slides(1).Shapes(1)

    .TextFrame.TextRange.InsertAfter ": Test version"

End With

Este ejemplo anexa el contenido del Portapapeles al final del título de la diapositiva número uno.

Application.ActivePresentation.Slides(1).Shapes(1).TextFrame _
    .TextRange.InsertAfter.Paste

Consulte también

Objeto TextRange

Soporte técnico y comentarios

¿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.