Свойство 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 и обратная связь.