社区
Microsoft Office应用
帖子详情
word如何去掉自动编号格式但保留原编号内容
cloudbaobao
2008-04-14 11:25:11
我需要将手头一篇WORD文档中的自动编号格式去掉,但还要保留原编号内容。即如下:
原文:(自动编号格式)
1.我爱我家;
2.我爱CSDN;
改为:(清掉格式,编号还在)
1.我爱我家;
2.我爱CSDN;
...全文
8501
4
打赏
收藏
word如何去掉自动编号格式但保留原编号内容
我需要将手头一篇WORD文档中的自动编号格式去掉,但还要保留原编号内容。即如下: 原文:(自动编号格式) 1.我爱我家; 2.我爱CSDN; 改为:(清掉格式,编号还在) 1.我爱我家; 2.我爱CSDN;
复制链接
扫一扫
分享
转发到动态
举报
写回复
配置赞助广告
用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中的表格的自动编号格式去掉,且保留原编号内容。所以不能简单的用选择性粘贴来解决。请高手指点。
机械制造基础课程设计设计“CA6140车床拨叉”零件03的机械加工工艺及18H11槽粗铣夹具.rar
机械制造基础课程设计设计“CA6140车床拨叉”零件03的机械加工工艺及18H11槽粗铣夹具.rar
python调用图莫斯+LIN通讯实现控制油泵转速
python调用图莫斯+LIN通讯实现控制油泵转速
EMPTY.rar
CAD缺少相关字体时,图纸中的文字会出现缺失或乱码。下载所需字体并复制到 AutoCAD 的 Fonts 文件夹后,即可正常显示。
Makefile
自动
化编译实战项目
Makefile
自动
化编译实战项目 Demo 4: Simple wc-style File Counter This demo is a small C project that counts lines,
word
s, and bytes in a text file. It uses a professional multi-file structure with a header file, implementation file, and main program. Build: make Run: ./wc_demo
Example: echo "Hello world\nThis is a demo file." > sample.txt ./wc_demo sample.txt Clean: make clean
neo4j压缩包,直接下载可以用
neo4j压缩包,直接下载可以用
Microsoft Office应用
6,217
社区成员
23,066
社区内容
发帖
与我相关
我的任务
Microsoft Office应用
Microsoft Office应用
复制链接
扫一扫
分享
社区描述
Microsoft Office应用
社区管理员
加入社区
获取链接或二维码
近7日
近30日
至今
加载中
查看更多榜单
社区公告
暂无公告
试试用AI创作助手写篇文章吧
+ 用AI写文章