Ескертпе
Бұл бетке кіру үшін қатынас шегін айқындау қажет. Жүйеге кіруді немесе каталогтарды өзгертуді байқап көруге болады.
Бұл бетке кіру үшін қатынас шегін айқындау қажет. Каталогтарды өзгертуді байқап көруге болады.
Представляет текстовый кадр в объекте 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 и обратная связь.