Свойство Subdocuments.Expanded (Word)

Значение true , если вложенные документы в указанном документе развернуты. Для чтения и записи, Boolean.

Синтаксис

выражение. Expanded

выражение Переменная, представляющая объект Subdocument.

Пример

В этом примере разворачиваются все вложенные документы в активном master документе.

If ActiveDocument.Subdocuments.Count >= 1 Then 
 ActiveDocument.Subdocuments.Expanded = True 
End If

В этом примере свойство Expanded переключается между развертыванием всех вложенных документов в активном окне и сворачиванием всех вложенных документов в активном документе.

ActiveDocument.Subdocuments.Expanded = _ 
 Not ActiveDocument.Subdocuments.Expanded

В этом примере определяется, развернуты ли вложенные документы в Report.doc, а затем отображается сообщение об их состоянии.

If Documents("Report.doc").Subdocuments.Expanded = True Then 
 MsgBox "All available information is displayed." 
Else 
 MsgBox "Expand subdocuments for more information." 
End If

См. также

Объект коллекции subdocuments

Поддержка и обратная связь

Есть вопросы или отзывы, касающиеся Office VBA или этой статьи? Руководство по другим способам получения поддержки и отправки отзывов см. в статье Поддержка Office VBA и обратная связь.