|
楼主 |
发表于 2009-9-23 21:23
|
显示全部楼层
[广告] VBA代码宝 - VBA编程加强工具 · VBA代码随查随用 · 内置多项VBA编程加强工具 ★ 免费下载 ★ ★ 使用手册★
实例一的解决方法:
第一步:将x月x日替换为x月x
勾选使用通配符。
查找([0-9]{1,2}月[0-9]{1,2})日
替换为\1
第二步:
查找([0-9]{4})?([0-9]{1,2})?([0-9]{1,2})
替换为^p\1-\2-\3^p
第三步:
将文章内容全选并复制到excel的某列,设置单元格格式为日期的中文格式。然后ctrl c复制,回到一个空白的word文档中,单击编辑—选择性粘贴—无格式文本。
第四步:去掉日期前后的回车
查找^13(????年*日)^13
替换为\1
解决办法说明:此例的解决需要先掌握word的查找替换通配符灵活运用,并对excel的单元格设置熟悉。
第一步的说明:查找代码([0-9]{1,2}月[0-9]{1,2})日,其中[0-9]表示数字0123456789中的任意一个数字,{1,2}表示前一字符或表达式出现1-2次。替换为\1,表示替换为查找框中第一个括号内的内容。
第二步的说明:([0-9]{4})?([0-9]{1,2})?([0-9]{1,2}),其中{4}表示前一字符或表达式出现4次。?表示任意单个字符。替换为其中的^p表示段落符号,即我们所谓的回车。\1\2\3分别对应查找框中第一个括号、第二个括号、第三个括号内的内容。
第三步的说明:通过选择性粘贴无格式文本,实现粘贴过后无边框。
第四步的说明:^p段落符号只能用于替换框,在查找框中不能正确查找到,查找框中运用^13来查找段落符号。
扩展思路:借用类似的方法,我们可以利用excel内置单元格格式或者自定义单元格格式的强大功能结合word查找替换来处理很多特定数据的处理。★★★★★
[ 本帖最后由 moon2778 于 2009-9-25 19:07 编辑 ] |
评分
-
1
查看全部评分
-
|