Свойство Range.StoryLength (Word)
Возвращает количество символов в истории, содержащей указанный диапазон. Только для чтения, Long.
Синтаксис
выражение. StoryLength
выражение: переменная, представляющая объект Range.
Пример
В этом примере определяется, является ли заголовок в активном документе пустым. Если история заголовка не пуста, в окне сообщения отображается содержимое заголовка. Если заголовок документа пуст, StoryLength возвращает значение 1 для последней отметки абзаца.
Set myRange = ActiveDocument.Sections(1) _
.Headers(wdHeaderFooterPrimary).Range
If myRange.StoryLength > 1 Then MsgBox myRange.Text
В этом примере документ закрывается без сохранения изменений, если он пуст.
If ActiveDocument.Content.StoryLength = 1 Then _
ActiveDocument.Close SaveChanges:=wdDoNotSaveChanges
См. также
Поддержка и обратная связь
Есть вопросы или отзывы, касающиеся Office VBA или этой статьи? Руководство по другим способам получения поддержки и отправки отзывов см. в статье Поддержка Office VBA и обратная связь.