Propriedade ParagraphFormat.AttachedToText (Publisher)
True se o objeto Font ou ParagraphFormat estiver anexado a um objeto TextRange .
Se o objeto for anexado a um objeto TextRange, o documento será atualizado quando as propriedades do objeto forem alteradas. Se o objeto não estiver anexado, nada no documento será alterado até que o objeto seja aplicado a um objeto TextRange ou TextStyle . Boolean somente leitura.
Sintaxe
expressão. AttachedToText
Expressão Uma variável que representa um objeto ParagraphFormat .
Exemplo
Este exemplo duplica a formatação de fonte e verifica se a formatação duplicada está anexada a um intervalo de texto. Se não for, anexa a formatação à segunda forma.
Sub DuplicateText()
Dim fntTemp As Font
With ActiveDocument.Pages(1)
Set fntTemp = .Shapes(1).TextFrame.TextRange.Font.Duplicate
If fntTemp.AttachedToText <> True Then _
ActiveDocument.Pages(1).Shapes(2) _
.TextFrame.TextRange.Font = fntTemp
End With
End Sub
Suporte e comentários
Tem dúvidas ou quer enviar comentários sobre o VBA para Office ou sobre esta documentação? 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.