如果该属性值为 True,则将指定一行或数行的格式设置为表格标题。当表格不止一页时,可将多行的格式重复设置为表格标题。可以是 True、False 或 wdUndefined。Long 类型,可读写。
本示例在活动文档的开始处创建一个 5x5 表格,然后将表格第一行的格式设置为表格标题。
Dim rngTemp As Range
Dim tableNew As Table
Set rngTemp = ActiveDocument.Range(0, 0)
Set tableNewe = ActiveDocument.Tables.Add(rngTemp, 5, 5)
tableNew.Rows(1).HeadingFormat = True
本示例判定是否将插入点所在行的格式设置为表格标题。
If Selection.Information(wdWithInTable) = True Then
If Selection.Rows(1).HeadingFormat = True Then _
MsgBox "The current row is a table heading"
Else
MsgBox "The insertion point is not in a table."
End If