Propriété TextRange.BoundLeft (PowerPoint)

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

Syntaxe

expression. BoundLeft

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.