Table.Uniform プロパティ (Word)

  • [アーティクル]

True テーブル内のすべての行に同じ数の列がある場合。 読み取り専用の Boolean です。

構文

式。 Uniform

式 'Table' オブジェクトを返す式。

例

次の使用例は、表を作成し、その中の 1 つのセルを分割します。また、表の中の各行の列数が同じでないことを示すメッセージ ボックスを表示します。

Set newDoc = Documents.Add 
Set myTable = newDoc.Tables.Add(Selection.Range, 5, 5) 
myTable.Cell(3, 3).Split 1, 2 
If myTable.Uniform = False Then MsgBox "Table is not uniform"

次の使用例は、選択範囲を含む表で、各行の列数が同じかどうかを調べます。

If Selection.Information(wdWithInTable) = True Then 
 MsgBox Selection.Tables(1).Uniform 
End If

関連項目

テーブル オブジェクト

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

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