英語で読む

次の方法で共有


Range.TopLevelTables プロパティ (Word)

現在の範囲で一番外側のネスト レベルにある表を表す Tables コレクションを返します。 読み取り専用です。

構文

expression. TopLevelTables

expressionRange オブジェクトを表す変数です。

注釈

このプロパティは、現在の指定範囲のコンテキストで一番外側のネスト レベルにある表のみを含むコレクションを取得します。 これらの表は、複合表全体で一番外側のネスト レベルにある表ではない場合もあります。

コレクションの 1 つのメンバーを返す方法については、「コレクション からオブジェクトを返す」を参照してください。

次の使用例は、新しい文書を作成し、3 レベルの複合表を作成し、各表の先頭のセルにそのネスト レベルを挿入します。 この例では、2 番目のレベルのテーブルの 2 番目の列を選択し、この選択で最上位のテーブルの最初の列を選択します。 入れ子になったテーブルのセット全体のコンテキスト内の最上位テーブルではない場合でも、最も内側のテーブルが選択されます。

Documents.Add 
ActiveDocument.Tables.Add Selection.Range, _ 
 3, 3, wdWord9TableBehavior, wdAutoFitContent 
With ActiveDocument.Tables(1).Range 
 .Copy 
 .Cells(1).Range.Text = .Cells(1).NestingLevel 
 .Cells(5).Range.PasteAsNestedTable 
 With .Cells(5).Tables(1).Range 
 .Cells(1).Range.Text = .Cells(1).NestingLevel 
 .Cells(5).Range.PasteAsNestedTable 
 With .Cells(5).Tables(1).Range 
 .Cells(1).Range.Text = _ 
 .Cells(1).NestingLevel 
 End With 
 .Columns(2).Select 
 Selection.Range.TopLevelTables(1).Select 
 End With 
End With

関連項目

Range オブジェクト

サポートとフィードバック

Office VBA またはこの説明書に関するご質問やフィードバックがありますか? サポートの受け方およびフィードバックをお寄せいただく方法のガイダンスについては、Office VBA のサポートおよびフィードバックを参照してください。