Método Shapes.Paste (PowerPoint)

Pega las formas, diapositivas o texto del Portapapeles en la colección Formas especificada, en la parte superior del orden z. Cada objeto pegado se convierte en un miembro de la colección Shapes especificada. Si el Portapapeles contiene diapositivas enteras, estas se pegarán como formas que contienen las imágenes de las diapositivas. Si el Portapapeles contiene un intervalo de texto, el texto se pegará en una forma TextFrame recién creada. Devuelve un objeto ShapeRange que representa los objetos pegados.

Sintaxis

más sencilla.Pegar

expresión Variable que representa un objeto Shapes.

Valor devuelto

ShapeRange

Comentarios

Utilice la propiedad ViewType para establecer la vista de una ventana antes de pegar el contenido del Portapapeles. En la tabla siguiente se muestran los elementos que pueden pegarse en cada vista.

En la vista Puede pegar desde el Portapapeles
Vista Diapositiva o vista Página de notas Formas, texto o diapositivas enteras. Si pega una diapositiva desde el Portapapeles, se insertará una imagen de la diapositiva en la diapositiva, patrón o página de notas como un objeto incrustado. Si se selecciona una forma, el texto pegado se anexará al texto de la forma; Si se selecciona texto, el texto pegado reemplazará la selección; Si se selecciona cualquier otra cosa, el texto pegado se colocará en su propio marco de texto. Las formas pegadas se agregarán a la parte superior del orden Z y no reemplazarán las formas seleccionadas.
Vista Esquema Texto o diapositivas completas. No se pueden pegar formas en la vista Esquema. La diapositiva pegada se insertará delante de la diapositiva que tiene el cursor.
Vista Clasificador de diapositivas Diapositivas completas. No se puede pegar formas ni texto en la vista Clasificador de diapositivas. La diapositiva pegada se insertará donde se encuentre el cursor o a continuación de la última diapositiva seleccionada en la presentación.

Si el contenido de origen no se descarga completamente, se produce un error en este método y se produce un error. Para obtener más información sobre los documentos parciales, consulte Trabajar con documentos parciales.

Ejemplo

En este ejemplo se copia la primera forma de la diapositiva número uno de la presentación activa en el Portapapeles y, a continuación, se pega en la diapositiva número dos.

With ActivePresentation

    .Slides(1).Shapes(1).Copy

    .Slides(2).Shapes.Paste

End With

En este ejemplo se corta el texto de la primera forma de la diapositiva número uno de la presentación activa, se copia en el Portapapeles y se pega después de la primera palabra de la segunda forma en la misma diapositiva.

With ActivePresentation.Slides(1)

    .Shapes(1).TextFrame.TextRange.Cut

    .Shapes(2).TextFrame.TextRange.Words(1).InsertAfter.Paste

End With

Vea también

Objeto Shapes

Trabajar con documentos parciales

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.

  • Last updated on