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

Objeto Range

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.