Propriedade Document.Content (Word)
Retorna um objeto Range que representa o texto do documento principal. Somente leitura.
Sintaxe
expressão. Conteúdo
Expressão Uma variável que representa um objeto Document .
Comentários
As duas instruções a seguir são equivalentes:
Set mainStory = ActiveDocument.Content
Set mainStory = ActiveDocument.StoryRanges(wdMainTextStory)
Exemplo
Este exemplo altera a fonte e o tamanho da fonte do texto do documento ativo para Arial de 10 pontos.
Set myRange = ActiveDocument.Content
With myRange.Font
.Name = "Arial"
.Size = 10
End With
Este exemplo insere texto no final do documento chamado "Changes. doc". Para cada … Próximo declaração é usada para determinar se o documento está aberto.
For Each aDocument In Documents
If InStr(LCase$(aDocument.Name), "changes.doc") Then
Set myRange = Documents("Changes.doc").Content
myRange.InsertAfter "the end."
End If
Next aDocument
Confira também
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.