Поделиться через


Метод Shapes.Paste (PowerPoint)

Вставляет фигуры, слайды или текст из буфера обмена в указанную коллекцию Фигуры в верхней части z-порядка. Каждый вставленный объект становится членом указанной коллекции Shapes . Если буфер обмена содержит целые слайды, они будут вставлены как фигуры, содержащие изображения слайдов. Если буфер обмена содержит текстовый диапазон, текст будет вставлен в только что созданную фигуру TextFrame . Возвращает объект ShapeRange , представляющий вставленные объекты.

Синтаксис

expression. Вставить

выражение: переменная, представляющая объект Shapes.

Возвращаемое значение

ShapeRange

Замечания

Используйте свойство ViewType , чтобы задать представление для окна перед вставкой в него содержимого буфера обмена. В следующей таблице показано, что можно вставить в каждое представление.

В этом представлении В буфер обмена можно вставить следующее:
Представление слайда или страницы заметок Фигуры, текст или целые слайды. При вставке слайда из буфера обмена изображение слайда будет вставлено на слайд, главную страницу или страницу заметок в виде внедренного объекта. Если выбрана одна фигура, вставленный текст будет добавлен к тексту фигуры; Если выбран текст, вставленный текст заменит выделенный фрагмент; Если выбрано что-либо еще, вставленный текст будет помещен в собственный текстовый фрейм. Вставленные фигуры будут добавлены в верхнюю часть z-порядка и не будут заменять выбранные фигуры.
Представление структуры Текст или целые слайды. Нельзя вставлять фигуры в режим контура. Вставленный слайд будет вставлен перед слайдом, содержащим курсор.
Представление сортировщика слайдов Слайды целиком. Нельзя вставить фигуры или текст в представление сортировщика слайдов. Вставленный слайд будет вставлен в курсор или после последнего слайда, выбранного в презентации.

Если исходное содержимое загружено не полностью, этот метод завершается сбоем и возникает ошибка. Дополнительные сведения о частичных документах см. в разделе Работа с частичными документами.

Пример

В этом примере фигура на слайде 1 в активной презентации копируется в буфер обмена, а затем вставляется во второй слайд.

With ActivePresentation

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

    .Slides(2).Shapes.Paste

End With

В этом примере текст вырезается в форме на первом слайде в активной презентации, помещает его в буфер обмена, а затем вставляется после первого слова в форме два на том же слайде.

With ActivePresentation.Slides(1)

    .Shapes(1).TextFrame.TextRange.Cut

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

End With

См. также

Объект Shapes

Работа с частичными документами

Поддержка и обратная связь

Есть вопросы или отзывы, касающиеся Office VBA или этой статьи? Руководство по другим способам получения поддержки и отправки отзывов см. в статье Поддержка Office VBA и обратная связь.