office强人来帮忙

[Rorschach]

http://zhidao.baidu.com/question/28625232.html

我的提问在这

[rongruo]

还没研究过，期待有心人！

[canghaixiao]

word和excel学得都不好~~~~~~~~~~~~~~~```

[天边有云]

用替换功能就可以实现了

不一定非要把5000个汉字全打上

我们只要让WORD知道需要保留什么就可以了

选上通配符

在查找里输入 [!a-z]

这样除了a-z 26个英文字母以外就全被替换掉了.当然你也别忘了数字是否要保留.

[canghaixiao]

小9，有人貌似回答了你的问题~~~~~~~~~~~~~~~

[tintin]

在你的Word 文档里写一个简单的宏就可以了，如下例：

Sub cutc()

For i = 1 To Len(ThisDocument.Content) char = Mid(ThisDocument.Content, i, 1) If Asc(char) <= 127 And Asc(char) >= 0 Then Selection.InsertAfter char End If Next i

End Sub

这个宏循环你打开的文档，并且在文档的最后面把英文提取出来，最后你把上面的原文删除即可。或者这个宏也可以新建一个文档，然后把原文中的英文插入到新文档中也足以满足你的要求了。

要使用宏，在工具菜单中选择宏→Visual Basic 编辑器，在左边工程窗中，选择你的文件，在模块处点右键增加新模块，将上面的内容拷贝进去，保存，直接运行也可以，也可以退出编辑，在工具菜单中选择宏→宏，在宏清单里找到cutc(与上面同名)，点运行就可以了。

注意几点：1.将光标置于文档尾 2.在运行前保存原文

[Rorschach]

感谢楼上的

[canghaixiao]

呵呵，论坛里真是藏龙卧虎~~~~~~~~~~~~~~~~``

[LooksTime]

不怎么会。。。