将指定的 Document、List 或 ListFormat 对象中的列表编号或 LISTNUM 域更改为文本。
expression.ConvertNumbersToText(NumberType)
expression 必需。该表达式返回“应用于”列表中的一个对象。
NumberType Variant 类型,可选。要转换的编号的类型。可取下列 WdNumberType 常量之一。
WdNumberType 可以是下列 WdNumberType 常量之一: |
wdNumberParagraph |
wdNumberListNum LISTNUM 域的默认值。 |
wdNumberAllNumbers 其他情况下的默认值。 |
编号有两种类型:一类是预设的编号 (wdNumberParagraph),可通过在“项目符号和编号”对话框中选取模板的方式将编号添加到段落中;另一种类型是 LISTNUM 域(wdNumberListNum),该类型允许为一个段落添加多个编号。
如果需要在另一个应用程序中处理文档,而该应用程序又不识别列表格式或 LISTNUM 域,则 ConvertNumbersToText 方法十分有用。
在将列表编号转换为文本之后,就不能在列表中对其进行处理。
本示例将活动文档中的列表编号和 LISTNUM 域转换为文本。
ActiveDocument.ConvertNumbersToText
本示例将第一个列表的编号转换为文本。
ActiveDocument.Lists(1).ConvertNumbersToText
本示例将 myRange
中的预设编号转换为文本,而不影响任何 LISTNUM 域。
Set myDoc = ActiveDocument
Set myRange = _
myDoc.Range(Start:=myDoc.Paragraphs(12).Range.Start, _
End:=myDoc.Paragraphs(20).Range.End)
myRange.ListFormat.ConvertNumbersToText wdNumberParagraph