Метод 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
См. также
Работа с частичными документами
Поддержка и обратная связь
Есть вопросы или отзывы, касающиеся Office VBA или этой статьи? Руководство по другим способам получения поддержки и отправки отзывов см. в статье Поддержка Office VBA и обратная связь.