Document.Subdocuments Свойство (2007 System)

Статья
11/16/2008

Обновлен: Ноябрь 2007

Возвращает коллекцию Subdocuments, в которой хранятся все вложенные документы в документе.

Пространство имен: Microsoft.Office.Tools.Word
Сборка: Microsoft.Office.Tools.Word.v9.0 (в Microsoft.Office.Tools.Word.v9.0.dll)

Синтаксис

'Декларация
<BrowsableAttribute(False)> _
Public ReadOnly Property Subdocuments As Subdocuments
'Применение
Dim instance As Document
Dim value As Subdocuments

value = instance.Subdocuments

[BrowsableAttribute(false)]
public Subdocuments Subdocuments { get; }

Значение свойства

Тип: Microsoft.Office.Interop.Word.Subdocuments
Коллекция Subdocuments, в которой хранятся все вложенные документы в документе.

Примеры

В приведенном ниже примере кода к первому абзацу выделенного фрагмента применяется стиль Заголовок 1, после чего создается вложенный документ для содержимого выделенного фрагмента. Затем в коде выводится окно сообщения с общим количеством вложенных документов в документе.

В этом примере демонстрируется настройка уровня документа.

Private Sub DocumentSubdocuments()
    Dim style As Object = Word.WdBuiltinStyle.wdStyleHeading1

    Me.Paragraphs(1).Range.InsertParagraphBefore()
    Me.Paragraphs(1).Range.Text = "This is sample text."
    Dim currentRange As Word.Range = Me.Paragraphs(1).Range
    currentRange.Select()
    Me.Application.Selection.Paragraphs(1).Style = style

    Me.Subdocuments.Expanded = True
    Me.Subdocuments.AddFromRange(Application.Selection.Range)

    MessageBox.Show("Total subdocuments: " & Me.Subdocuments.Count.ToString())
End Sub

private void DocumentSubdocuments()
{
    object style = Word.WdBuiltinStyle.wdStyleHeading1;

    this.Paragraphs[1].Range.InsertParagraphBefore();
    this.Paragraphs[1].Range.Text = "This is sample text.";
    Word.Range currentRange = this.Paragraphs[1].Range;
    currentRange.Select();
    this.Application.Selection.Paragraphs[1].set_Style(ref style);

    this.Subdocuments.Expanded = true;
    this.Subdocuments.AddFromRange(Application.Selection.Range);

    MessageBox.Show("Total subdocuments: " + this.Subdocuments.Count.ToString());
}

Разрешения

Полное доверие для непосредственно вызывающего метода. Этот член не может быть использован частично доверенным кодом. Дополнительные сведения см. в разделе Использование библиотек из не вполне надежного кода.

См. также

Ссылки

Document Класс

Document - члены

Microsoft.Office.Tools.Word - пространство имен

Поделиться через