Método de TextRange. runs (PowerPoint)TextRange.Runs method (PowerPoint)

Retorna um objeto TextRange que representa o subconjunto especificado de sequências de texto.Returns a TextRange object that represents the specified subset of text runs. Um fluxo de texto consiste em um intervalo de caracteres que compartilham os mesmos atributos de fonte.A text run consists of a range of characters that share the same font attributes.

SintaxeSyntax

expression.expression. Runs( _Start_, _Length_ )Runs( _Start_, _Length_ )

expressão Uma variável que representa um objeto TextRange .expression A variable that represents a TextRange object.

ParâmetrosParameters

NomeName Obrigatório/OpcionalRequired/Optional Tipo de dadosData type DescriçãoDescription
StartStart OpcionalOptional LongLong O primeiro fluxo do intervalo retornado.The first run in the returned range.
LengthLength OpcionalOptional LongLong O número de fluxos a serem retornados.The number of runs to be returned.

Valor de retornoReturn value

TextRangeTextRange

ComentáriosRemarks

Se Start e Length forem omitidos, o intervalo retornado iniciará com a primeira sequência e terminará com o último parágrafo no intervalo especificado.If both Start and Length are omitted, the returned range starts with the first run and ends with the last paragraph in the specified range.

Se Start for especificado, mas Length for omitido, o intervalo retornado conterá uma sequência.If Start is specified but Length is omitted, the returned range contains one run.

Se Length for especificado, mas Start for omitido, o intervalo retornado iniciará com a primeira sequência no intervalo especificado.If Length is specified but Start is omitted, the returned range starts with the first run in the specified range.

Se Start for maior que o número de sequências no texto especificado, o intervalo retornado iniciará com a última sequência no intervalo especificado.If Start is greater than the number of runs in the specified text, the returned range starts with the last run in the specified range.

Se Length for maior que o número de sequências a partir da linha de início especificada até o final do texto, o intervalo retornado conterá todas essas sequências.If Length is greater than the number of runs from the specified starting run to the end of the text, the returned range contains all those runs.

Uma sequência consiste em todos os caracteres a partir do primeiro caractere após uma alteração de fonte até o penúltimo caractere com os mesmos atributos de fonte.A run consists of all characters from the first character after a font change to the second-to-last character that has the same font attributes. Por exemplo, considere a seguinte sentença:For example, consider the following sentence:

Esta palavra em itálico não está em negrito.This italic word is not bold.

Na frase anterior, o primeiro fluxo consistirá na palavra "Este" somente se o espaço após a palavra "Este" não estiver formatado com itálico (se o espaço for itálico, o primeiro fluxo será formado apenas pelos três primeiros caracteres, ou "Est").In the preceding sentence, the first run consists of the word "This" only if the space after the word "This" isn't formatted as italic (if the space is italic, the first run is only the first three characters, or "Thi"). Da mesma forma, o segundo fluxo só conterá a palavra itálico se o espaço após a palavra estiver formatado com itálico.Likewise, the second run contains the word "italic" only if the space after the word is formatted as italic.

Para obter informações sobre contagem ou loop por meio de execuções em um intervalo de texto, consulte o objeto TextRange .For information about counting or looping through the runs in a text range, see the TextRange object.

ExemploExample

Este exemplo formata o segundo fluxo na forma dois do slide um da apresentação ativa com negrito e itálico se ele já for itálico.This example formats the second run in shape two on slide one in the active presentation as bold italic if it is already italic.

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

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

End With


Confira tambémSee also

Objeto TextRangeTextRange Object

Suporte e comentáriosSupport and feedback

Tem dúvidas ou quer enviar comentários sobre o VBA para Office ou sobre esta documentação?Have questions or feedback about Office VBA or this documentation? Confira Suporte e comentários sobre o VBA para Office a fim de obter orientação sobre as maneiras pelas quais você pode receber suporte e fornecer comentários.Please see Office VBA support and feedback for guidance about the ways you can receive support and provide feedback.