如果你想取消word中已经存在的项目符号与编号的数据格式,但是又想保留项目符号与编号里面的数字,那么,使用普通方法是不行的,你得使用VBA才能顺利完成。因为普通的办法可令项目符号与编号自动取消,但是问题是连编号里面的数字也被删除了。
下面的VBA代码的功能是这样的,如果你选中了文档中的内容,那么,就把选中部分的项目符号格式去掉,保留数字,否则,没选中任何段落的话,就对整篇文档的项目符号与编号删除格式并保留数字。
If Selection.Type = wdSelectionIP Then
ActiveDocument.Content.ListFormat.ConvertNumbersToText
ActiveDocument.Content.Find.Execute FindText:="^t", replacewith:=" ", Replace:=wdReplaceAll
Else
Selection.Range.ListFormat.ConvertNumbersToText
Selection.Find.Execute FindText:="^t", replacewith:=" ", Replace:=wdReplaceAll
End If
此代码用于VBA环境,在word中使用。