切换到宽版
  • 4679阅读
  • 3回复

一次替换WORD文档中的直引号为双引号 [复制链接]

上一主题 下一主题
离线白山
 

发帖
3187
金币
11739
威望
113
贡献值
18
开心币
365
只看楼主 倒序阅读 使用道具 楼主  发表于: 2004-02-29
  为了节省时间,有些WORD文档中的全角双引号(“”)都打成了半角直引号("),这不符合中文的习惯,需要把它们替换为双引号。我用WORD的替换功能尝试了多次,打算一次将所有的直引号按匹配的方式替换为双引号,都没有成功,于是就编写了一个可以完成此工作的宏命令ReplaceQuote。
  创建宏命令很简单,单击“工具”-“宏”-“"宏”,打开宏对话窗口,在“宏名”编辑框中填入“ReplaceQuote”,单击“创建”按钮,打开Visual Basic编辑器,在代码窗口中输入下面的代码,然后保存工作。ReplaceQuote宏程序清单如下:
  Sub ReplaceQuote()
  Selection.Find.ClearFormatting
  Selection.Find.Replacement.ClearFormatting
  With Selection.Find
  .Text = """"
  .Forward = True
  .Wrap = wdStop
  .MatchByte = True
  End With
  With Selection
  While .Find.Execute
  .Text = ChrW(8220)
  .Find.Execute
  .Text = ChrW(8221)
  Wend
  End With
  End Sub
  返回到WORD后,就可以是在宏对话窗口中选择并运行该宏命令了。首先将插入点定位在第一个配对的直引号(”)前,运行该宏,它会自动按配对的方式将直引号替换为双引号。为了使用方便,可以把该宏定义到工具栏上,使用时只须单击工具栏按钮即可。
成功=艰苦劳动+正确方法+少说空话 --爱因斯坦
离线白山

发帖
3187
金币
11739
威望
113
贡献值
18
开心币
365
只看该作者 沙发  发表于: 2004-02-29
此方法对更新网站文章非常有帮助,不知道wps有没有此类方法?
成功=艰苦劳动+正确方法+少说空话 --爱因斯坦
离线白山

发帖
3187
金币
11739
威望
113
贡献值
18
开心币
365
只看该作者 板凳  发表于: 2004-04-16
巧解多页面问题 妙用Word“空行替换”
文/雨青

  在日常工作中,我们经常从网上下载一些文字材料,往往因空行多使得页数居高不下。关于“空行替换”的相关文章也看过一些,大致都是这种方法:在“编辑”菜单中打开“查找和替换”对话框,在“查找内容”中输入“^p^p”“替换为”中输入“^p”,然后“全部替换”。

  而眼下的一份二级C试卷,用上面的方法却是屡试屡败,每次都是提示:“Word已完成对文档的搜索并已完成0处替换”。为什么空行就在眼前,Word却不认识它呢?

  经过细心查找,发现在用替换的办法删除空行时要注意两个问题:

  1.分清文件中用的是手动换行符(“Shift+回车”),还是段落标记。“^p^p”替换成“^p”并不能替换所有的空行。如果文件中用的是手动换行符,那么就要用“^l^l”替换成“^l”(这里用的不是1,而是L字母的小写,也可以直接用替换对话框里的“特殊字符”,里面有“有手动换行符”),空行才能去除。

  我要用的试卷正是用手动换行符换行的。可是我也用了“^l^l”替换成“^l”的办法,用“全部替换”时依然提示“Word已完成对文档的搜索并已完成0处替换”这又是为什么呢?把我搞得一头雾水,为了搞清楚到底问题出在哪里,我又在Word文档中分别用手动换行符和回车符制造一些空行,用“^p^p”替换成“^p”和“^l^l”替换成“^l”来验证,结果能顺利完成空行的删除。为什么我自己输入的可以替换,网上下载的却不能呢?难道这里面还有“机关”?

  2.注意空格的存在。无奈之下,我只得手工删除了。在删除的过程中,我发现了它的秘密:原来每个空行的换行符前还有一个空格。空格成了折腾我的“罪魁祸首”!再用“^l ^l”(注意两个换行之间有一个空格)替换成“^l”,替换终于有成果了。单击了几次全部替换,又更改了几次“查找内容”,比如把“^p ^l”替换成“^l”。我的页面中再也没有空行了。

  看来用替换的方法来删除空行时,要灵活对待查找的内容,不然,Word可不懂你的心。电脑是智能的也是最“死心眼”的。

成功=艰苦劳动+正确方法+少说空话 --爱因斯坦
离线小李飞刀

发帖
2410
金币
1880
威望
68
贡献值
32
开心币
282
只看该作者 地板  发表于: 2004-10-16
收藏了
一年不务农桑,一年忍饥受冻  一日不看江恩,半月被套亏损
快速回复
限100 字节
批量上传需要先选择文件,再选择上传
 
上一个 下一个