Propriedade Range.StoryLength (Word)
Retorna o número de caracteres do texto que contém o intervalo especificado. Long somente leitura.
Sintaxe
expression. StoryLength
expressão Uma variável que representa um objeto de Intervalo.
Exemplo
Este exemplo determina se o cabeçalho do documento ativo está vazio. Se o texto do cabeçalho não estiver vazio, uma caixa de mensagem exibirá o conteúdo do cabeçalho. Quando o cabeçalho do documento está vazio, StoryLength retorna 1 para a marca de parágrafo final.
Set myRange = ActiveDocument.Sections(1) _
.Headers(wdHeaderFooterPrimary).Range
If myRange.StoryLength > 1 Then MsgBox myRange.Text
Este exemplo fecha o documento sem salvar alterações se ele estiver vazio.
If ActiveDocument.Content.StoryLength = 1 Then _
ActiveDocument.Close SaveChanges:=wdDoNotSaveChanges
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.