No comando Substituir, corresponda apenas às primeiras palavras do documento

Estou usando Substituir para colocar em itálico as primeiras palavras de cada parágrafo que são seguidas por uma guia usando esta expressão curinga:

^13*^t

O ^13localiza o início de um novo parágrafo. Eu só quero substituir as primeiras palavras de um parágrafo se elas forem seguidas por uma guia, daí o ^t.

E estou substituindo-o por ^&, e a formatação em itálico é aplicada.

Isso funciona para tudo, exceto o primeiro parágrafo do documento, já que não começa com um ^13, aparentemente. Existe uma maneira de corresponder apenas às primeiras palavras seguidas por uma guia?

Estou colocando isso em uma macro, por isso estou aberto a usar recursos que só estão disponíveis em uma macro, se necessário.

Você pode conseguir isso com uma macro VBA (que pode ser atribuída a uma tecla de atalho), sem usar a localização e substituição.

Nota: este código também pressupõe que você use o método descrito em sua postagem anterior, SHIFT e ENTER para iniciar um novo parágrafo para o mesmo orador.

O código a seguir percorre cada parágrafo e verifica cada palavra - coloca em itálico cada palavra até encontrar um caractere de tabulação; nesse momento, ele passa para o próximo parágrafo e repete o processo.

Sub italiciseBeforeTab()

    Dim para As Paragraph

    For Each para In ActiveDocument.Paragraphs

        Dim wd As Range

        For Each wd In para.Range.Words

            wd.Font.Italic = True
            If wd = vbTab Then Exit For

        Next wd

    Next para

End Sub