Méthode TextRange.Runs (PowerPoint)

Renvoie un objet TextRange qui représente le sous-ensemble spécifié d’exécutions de texte. Une exécution de texte représente une plage de caractères partageant les mêmes attributs de police.

Syntaxe

expression. Runs( _Start_, _Length_ )

Expression Variable qui représente un objet TextRange .

Parameters

Valeur renvoyée

TextRange

Remarques

Si les paramètres Début et Longueur sont tous deux omis, la page renvoyée commence par la première exécution et se termine par le dernier paragraphe de la plage spécifiée.

Si le paramètre Début est spécifié mais pas le paramètre Longueur, la plage renvoyée contient une exécution.

Si le paramètre Longueur est spécifié mais pas le paramètre Début, la plage renvoyée commence par la première exécution de la plage spécifiée.

Si le paramètre Début est supérieur au nombre d’exécutions dans le texte spécifié, la plage renvoyée commence par la dernière exécution de la plage spécifiée.

Si le paramètre Longueur est supérieur au nombre d’exécutions, de l’exécution spécifiée à la fin du texte, la plage renvoyée contient ces exécutions.

Une exécution se compose de tous les caractères, du premier caractère après un changement de police à l’avant-dernier caractère ayant les mêmes attributs de police. Par exemple, examinez la phrase ci-dessous :

Ici italic n’est pas en gras.

Dans cette phrase, la première suite se compose du mot « Ici » seulement si l’espace suivant n’est pas en italique (si l’espace est aussi en italique, la première suite ne contient que les deux premiers caractères, « Ic »). De la même façon, la deuxième suite contient le mot « italique » si l’espace situé après ce mot est aussi en italique.

Pour plus d’informations sur le comptage ou la boucle des exécutions dans une plage de texte, consultez l’objet TextRange .

Exemple

Cet exemple met en gras et italique la deuxième suite de la deuxième forme de la première diapositive de la présentation active si elle est déjà en italique.

With Application.ActivePresentation.Slides(1).Shapes(2) _
        .TextFrame.TextRange

    With .Runs(2).Font
        If .Italic Then
            .Bold = True
        End If
    End With

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.