文献资料处理之WORD中匹配目标格式和去除换行符的方法.docVIP

文献资料处理之WORD中匹配目标格式及去除换行符的方法 2007年05月06日 星期日 下午 05:52 文献资料处理之WORD中匹配目标格式及去除换行符的方法1、可能我们读文献的人都会遇到：每次从CAJ或PDF文件上复制一段文本到WORD时，由于其自带的格式，与您在WORD文件的格式总是不一样，这时候：如果您使用的是WORD2000，那你只有用格式刷了；如果您使用的是WORD2003，还行，有　粘贴选项――＞匹配目标格式，可以达到理想的效果，但如果每次都点那个匹配目标格式未免让人心烦，当然有简单的办法，那就是宏，宏代码如下：Sub 格式粘贴()?? Selection.PasteAndFormat (wdFormatSurroundingFormattingWithEmphasis)End Sub2、以上述方法处理好了之后，我们发现总是断句的，也就是说有许多回车符，这时候可以按以下方法进行处理：处理前效果：促进沙产业发展基金会专题报告会近日在中国科技会堂举行。与会者一致认为，实践证明，钱学森的“沙产业”理论是解决沙漠地区经济社会发展的好办法，对西部农业大开发具有重要意义。处理后效果：促进沙产业发展基金会专题报告会近日在中国科技会堂举行。与会者一致认为，实践证明，钱学森的“沙产业”理论是解决沙漠地区经济社会发展的好办法，对西部农业大开发具有重要意义。先在WORD2003中选定该段比较乱的文字，然后A 点击菜单中的　编辑――＞替换这一步可以用快捷键CTRL+H来代替B 点查找内容输入框（指要输入查找的内容）C ――＞高级――＞特殊字符――＞段落标记（这里应该在查找内容输入框出现一个^P）这一步可以用　快捷键CTRL+P来代替D 按全部替换（当问到是否搜索文档其他部分时，一定要选否；如果选是，那您的整篇文章就成一段了！不过如果出现这种情况，可以恢复再来一次）这样这段文字就处理好了。当然更好的办法就是将这些步骤记下来，让WORD2003自己去做，宏代码如下：Sub 换行清除()?? Selection.Find.ClearFormatting?? Selection.Find.Replacement.ClearFormatting?? With Selection.Find???? .Text = ^p???? .Replacement.Text = ???? .Forward = True???? .Wrap = wdFindAsk???? .Format = False???? .MatchCase = False???? .MatchWholeWord = False???? .MatchByte = True???? .MatchWildcards = False???? .MatchSoundsLike = False???? .MatchAllWordForms = False?? End With?? Selection.Find.Execute Replace:=wdReplaceAll?? Selection.MoveDown Unit:=wdLine, Count:=1End Sub附：宏的应用　　宏是WORD的一个重要功能，启动宏录制器，并进行一系列操作，即可在 Word 中录制宏。可以将一些经常使用的宏指定到工具栏、菜单或快捷键中，以后运行宏就可以直接单击工具栏按钮或菜单项，或按快捷键，不必使用宏对话框。?? 录制宏时，可单击工具栏按钮和菜单选项。但是，宏录制器不能录制文档窗口中的鼠标运动，如果要移动插入点、选定文本，滚动文档，必须用键盘录制这些操作。?? 如果录制过程中出现对话框，只有选择对话框中的【确定】按钮或【关闭】时，Word 才录制对话框，并录制对话框的所有选项设置。例如，假设宏包括【编辑】菜单中的【查找】或【替换】命令，如果在【搜索范围】框中选择【全部】选项，则运行宏时进行全文搜索。如果选择【向上】或【向下】选项，Word 会在查找到文档开头或结尾时停止宏，并显示提示信息询问是否继续搜索。一、录制宏?? 如果要录制宏，可以按以下步骤进行：?? （1）单击【工具】菜单中的【宏】命令，从级联菜单中选择【录制新宏】命令，出现【录制宏】对话框。?? （2）在【宏名】框中，键入要录制宏的名称。?? （3）在【将宏保存到】框中，选择要保存宏的模板或文档。默认使用Normal 模板，这样以后所有文档都可以使用这个宏。如果只想把宏应用