Примечание.
Для доступа к этой странице требуется авторизация. Вы можете попробовать войти или изменить каталоги.
Для доступа к этой странице требуется авторизация. Вы можете попробовать изменить каталоги.
Представляет текстовый кадр в объекте Shape или ShapeRange . Содержит текст в текстовом фрейме и предоставляет свойства и методы, управляющие выравниванием и привязкой текстового фрейма.
Замечания
Используйте свойство TextFrame2 объектов Shape и ShapeRange , чтобы вернуть объект TextFrame2 .
Пример
Следующий код добавляет прямоугольник к слайду, текст к прямоугольнику, а затем задает поля для текстового кадра.
Set pptSlide = ActivePresentation.Slides(1)
With pptSlide.Shapes.AddShape(msoShapeRectangle, 0, 0, 250, 140).TextFrame2
.TextRange.Text = "Here is some sample text"
.MarginBottom = 10
.MarginLeft = 10
.MarginRight = 10
.MarginTop = 10
End With
См. также
Поддержка и обратная связь
Есть вопросы или отзывы, касающиеся Office VBA или этой статьи? Руководство по другим способам получения поддержки и отправки отзывов см. в статье Поддержка Office VBA и обратная связь.