将列表转换为文本(Microsoft Word)
如果您使用了Word的编号列表功能,则可能已经注意到无法选择每个列表项开头的数字。
此外,当您删除或添加列表中的项目时,列表中的其他项目也会重新编号以补偿您的操作。
在大多数情况下,这正是您期望并希望编号列表起作用的方式。但是,有时候您可能希望列表被“冻结”,这意味着数字不会改变。在这些情况下,自动编号功能似乎比挫败感更令人沮丧。
有两种方法可以解决此问题。第一种,我称为蛮力方法,涉及一些剪切和粘贴。您需要做的就是遵循以下一般步骤:
。选择要冻结的列表。
。按Ctrl + C将文本复制到剪贴板。该列表仍应选中。
。显示功能区的“主页”选项卡。
。单击功能区“剪贴板”组中“粘贴”工具下的向下箭头,然后选择“选择性粘贴”。 Word将显示“选择性粘贴”对话框。 (请参见图1。)
。选择“无格式文本”作为粘贴类型。
。单击确定。
这些操作用其自身的文本替换现有的动态列表,并且Word自动将自动编号转换为文本。
当然,这有几个不同的缺点。首先,您将丢失列表项中可能具有的任何其他特殊格式。如果某些词的格式与段落默认值不同(例如,粗体或斜体词),则将其消除,必须手动重做。
一种更简单的方法是使用宏为您完成这项工作。 VBA包含一种特殊的方法,该方法可以消除已经提到的缺点,并使转换过程更加简洁。除自动列表编号外,其他格式均不受影响。以下是ListPlain宏:
Sub ListPlain() Dim lp As Paragraph For Each lp In ActiveDocument.ListParagraphs lp.Range.ListFormat.ConvertNumbersToText Next lp End Sub
注意宏有多短。它也非常快速地运行,并且会影响整个文档中的所有编号。依赖于Word自动编号的任何编号列表都会受到影响,任何LISTNUM字段也会受到影响。
注意:
如果您想知道如何使用此页面(或_WordTips_网站上的任何其他页面)中描述的宏,我准备了一个包含有用信息的特殊页面。
_WordTips_是您进行经济有效的Microsoft Word培训的来源。
(Microsoft Word是世界上最流行的文字处理软件。)本技巧(11072)适用于Microsoft Word 2007、2010、2013、2016、2019和Office 365中的Word。 Word的旧菜单界面在这里: