Dzwebs.Net

撰写电脑技术杂文十余年

取消word项目符号与编号格式,保留原来的数字

Admin | 2014-4-4 9:57:00 | 被阅次数 | 12329

温馨提示!

如果未能解决您的问题,请点击搜索;登陆可复制文章,点击登陆

  如果你想取消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中使用。


该杂文来自: Word杂文

上一篇:引用word活动文档元素

下一篇:使用word目录与索引必备的条件

网站备案号:

网站备案号:滇ICP备11001339号-7

版权属性:

Copyright 2007-2021-forever Inc. all Rights Reserved.

联系方式:

Email:dzwebs@126.com QQ:83539231 访问统计