word如何去掉自动编号格式但保留原编号内容

cloudbaobao 2008-04-14 11:25:11
我需要将手头一篇WORD文档中的自动编号格式去掉,但还要保留原编号内容。即如下:
原文:(自动编号格式)
1.我爱我家;
2.我爱CSDN;
改为:(清掉格式,编号还在)
1.我爱我家;
2.我爱CSDN;
...全文
8239 4 打赏 收藏 转发到动态 举报
AI 作业
写回复
用AI写文章
4 条回复
切换为时间正序
请发表友善的回复…
发表回复
dhcs 2008-05-20
  • 打赏
  • 举报
回复 1
如何把WORD编号转换为普通文本

原帖地址:
http://www.topsage.com/dispbbs.asp?boardID=22&ID=53405&page=1

解决方案:

打开WORD,依次点击:工具-宏-宏-在“宏名”框内输入宏名(好比:NumToTxt)-单击“创建”按钮,弹出Visual Basic编辑器窗口,窗口内自动出现以下内容:

Sub NumToTxt()

NumToTxt Macro
宏在 2006-12-3 由 www.TopSage.com 创建

End Sub

其中宏在哪天由谁创建,是根据你的创建的时间、电脑设置来决定的!

把下面的这段代码复制下来:
ActiveDocument.Content.ListFormat.ConvertNumbersToText

粘贴到编辑器窗口内容“End Sub”前面,现在,编辑器窗口的内容应该是这个样子:

Sub NumToTxt()

NumToTxt Macro
宏在 2006-12-3 由 www.TopSage.com 创建

ActiveDocument.Content.ListFormat.ConvertNumbersToText
End Sub

最后点Visual Basic编辑器保存按钮,将宏保存到Normal模板,然后关闭VBA窗口并返回Word。

打开你要处理的WORD文档,依次点击:工具-宏-宏-选中NumToTxt这个我们刚刚创建的宏(选中后在“宏名”框内会显示NumToTxt)-运行
dhcs 2008-05-20
  • 打赏
  • 举报
回复
1、这里有答案:http://zhidao.baidu.com/question/16274629.html?fr=qrl
用 word 的宏完成:
Sub kgs()
Dim kgslist As List
For Each kgslist In ActiveDocument.Lists
kgslist.ConvertNumbersToText
Next
End Sub

2、如果用其他编程语言处理,请参考:http://msdn.microsoft.com/de-de/library/microsoft.office.interop.word.list.convertnumberstotext(VS.80).aspx
cloudbaobao 2008-04-14
  • 打赏
  • 举报
回复
补充一下需求:
需要将word中的表格的自动编号格式去掉,且保留原编号内容。所以不能简单的用选择性粘贴来解决。请高手指点。
office系列之word实用技巧: 1、 Word表格自动填充   在Word表格里选中要填入相同内容的单元格,单击“格式→项目符号和编号”,进入“编号”选项卡,选择任意一种样式,单击“自定义”按钮,在“自定义编号列表”窗口中“编号格式”栏内输入要填充的内容,在“编号样式”栏内选择“无”,依次单击“确定”退出后即可。   2、 Word中巧输星期   单击“格式→项目符号和编号”,进入“编号”选项卡,单击“自定义”按钮,在“编号样式”栏内选择“一、二、三”等样式,在“编号格式”栏内的“一”前输入“星期”即可。   3、 粘贴网页内容   在Word中粘贴网页,只须在网页中复制内容,切换到Word中,单击“粘贴”按钮,网页中所有内容就会样复制到Word中,这时在复制内容的右下角会出现一个“粘贴选项”按钮,单击按钮右侧的黑三角符号,弹出一个菜单,选择“仅保留文本”即可。   4、 快速转换大写金额   在Word中输入12345,然后点击“插入→数字”命令,在弹出的“数字”对话框“数字类型”栏里选择中文数字版式“壹、贰、叁••••• • • ”单击“确定”,则12345就变成中文数字“壹万贰仟叁佰肆拾伍”。   5、 去掉自动编号功能   点击“工具→自动更正选项”,打开“自动更正”对话框,进入“键入时自动套用格式”选项卡,找到“键入时自动应用”组中的“自动编号列表”复选项,取消前面的钩即可。这样就可以去掉那些“烦心”的自动编号功能。同样也可去除“画布”,方法是:点击“工具→选项”,进入“常规”选项卡,去除“插入‘自选图形’时自动创建绘图画布”复选框上的钩即可。

6,216

社区成员

发帖
与我相关
我的任务
社区描述
Microsoft Office应用
社区管理员
  • Microsoft Office应用社区
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

试试用AI创作助手写篇文章吧