Метод ShapeRange.PickUp (PowerPoint)
Копирует форматирование указанной фигуры. Используйте метод Apply , чтобы применить скопированное форматирование к другой фигуре.
Синтаксис
expression. Пикап
Выражение Переменная, представляющая объект ShapeRange .
Пример
В этом примере копируется форматирование фигуры в myDocument , а затем копируется к второй фигуре.
Set myDocument = ActivePresentation.Slides(1)
With myDocument
.Shapes(1).PickUp
.Shapes(2).Apply
End With
См. также
Поддержка и обратная связь
Есть вопросы или отзывы, касающиеся Office VBA или этой статьи? Руководство по другим способам получения поддержки и отправки отзывов см. в статье Поддержка Office VBA и обратная связь.