Propriété TextRange.BoundTop (PowerPoint)

Cette propriété renvoie la distance (en points) entre le haut du cadre de la zone de texte spécifiée et le haut de la diapositive. En lecture seule.

Syntaxe

expression. BoundTop

Expression Variable qui représente un objet TextRange .

Valeur renvoyée

Unique

Exemple

Cet exemple montre comment ajouter un rectangle arrondi dans la diapositive 1 de la présentation en cours. Le rectangle a les mêmes dimensions que le cadre du texte de la forme 1.

With Application.ActivePresentation.Slides(1).Shapes
    Set tr = .Item(1).TextFrame.TextRange
    Set roundRect = .AddShape(msoShapeRoundedRectangle, _
        tr.BoundLeft, tr.BoundTop, tr.BoundWidth, tr.BoundHeight)
End With

With roundRect.Fill
    .ForeColor.RGB = RGB(255, 0, 128)
    .Transparency = 0.75
End With

Voir aussi

Objet TextRange

Assistance et commentaires

Avez-vous des questions ou des commentaires sur Office VBA ou sur cette documentation ? Consultez la rubrique concernant l’assistance pour Office VBA et l’envoi de commentaires afin d’obtenir des instructions pour recevoir une assistance et envoyer vos commentaires.