次の方法で共有


Range.ConvertToTable メソッド (Word)

範囲内のテキストをテーブルに変換します。 Table オブジェクトとして取得します。

構文

ConvertToTable( _Separator_ , _NumRows_ , _NumColumns_ , _InitialColumnWidth_ , _Format_ , _ApplyBorders_ , _ApplyShading_ , _ApplyFont_ , _ApplyColor_ , _ApplyHeadingRows_ , _ApplyLastRow_ , _ApplyFirstColumn_ , _ApplyLastColumn_ , _AutoFit_ , _AutoFitBehavior_ , _DefaultTableBehavior_ )

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

パラメーター

名前 必須 / オプション データ型 説明
Separator 省略可能 バリアント型 (Variant) テキストをセルに分割するために使用する文字を指定します。 文字または 段落 の次の定数のいずれかを指定できます。 この引数を省略すると、 DefaultTableSeparator プロパティの値が使用されます。
NumRows 省略可能 バリアント型 (Variant) 表の行数を指定します。 この引数を省略すると、指定範囲の内容に基づいて行数が設定されます。
NumColumns 省略可能 バリアント型 (Variant) 表の列数を指定します。 この引数を省略すると、指定範囲の内容に基づいて列数が設定されます。
InitialColumnWidth 省略可能 バリアント型 (Variant) 各列の最初の幅をポイント単位で指定します。 この引数を省略すると、印字範囲の幅全体を使うように表の列幅が計算されます。
Format オプション バリアント型 (Variant) 表のオート フォーマット] ダイアログ ボックスに記載されている定義済み書式のいずれかを指定します。 WdTableFormat 定数のいずれかをすることができます。
ApplyBorders 省略可能 バリアント型 (Variant) True を指定した形式の枠線のプロパティを適用します。
ApplyShading 省略可能 バリアント型 (Variant) True を指定した書式の網かけのプロパティを適用します。
ApplyFont 省略可能 バリアント型 (Variant) True を指定した書式のフォントのプロパティを適用します。
ApplyColor 省略可能 バリアント型 (Variant) True を指定した形式の色のプロパティを適用します。
ApplyHeadingRows 省略可能 バリアント型 (Variant) True を指定した書式のタイトル行に関するプロパティが適用されます。
ApplyLastRow 省略可能 バリアント型 (Variant) True を指定した書式の最終行に関するプロパティが適用されます。
ApplyFirstColumn 省略可能 バリアント型 (Variant) True を指定した書式の先頭列のプロパティを適用します。
ApplyLastColumn 省略可能 バリアント型 (Variant) True を指定した書式の最終列に関するプロパティが適用されます。
AutoFit 省略可能 バリアント型 (Variant) True の テキストを変更することがなく、可能な限り多くのテーブルの列の幅を狭くには、セルにラップします。
AutoFitBehavior 省略可能 バリアント型 (Variant) テーブルのサイズを変更するための自動調整の規則を設定します。 WdAutoFitBehavior 定数を次のいずれかをすることができます。 DefaultTableBehavior に wdWord8TableBehavior がある場合、この引数は無視されます。
DefaultTableBehavior 省略可能 バリアント型 (Variant) Microsoft Word が自動的に (自動調整) の内容に合わせて表のセルをサイズ変更するかどうかを指定する値を設定します。 WdDefaultTableBehavior 定数のいずれかをすることができます。

戻り値

Table

次の使用例は、作業中の文書の最初の 3 つの段落を表にします。

Set aDoc = ActiveDocument 
Set myRange = aDoc.Range(Start:=aDoc.Paragraphs(1).Range.Start, _ 
 End:=aDoc.Paragraphs(3).Range.End) 
myRange.ConvertToTable Separator:=wdSeparateByParagraphs

関連項目

Range オブジェクト

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

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