如何用通配符 将 “从特定字符到文件结尾” 替换为空

你人真好

请教 大侠 ，如何用通配符 将 “从试卷答案开始到文件结尾” 替换为空。就是 从试卷答案 这四个字 开始 到文件最后一个字 全部删除。

文件样本 在附件。拜托各位大侠，帮帮忙，这个问题自己摸索了好几天，都没解决。  给大家拜个早年，祝大家春节快乐，顺顺利利。

补充说明：像这种文件接近500多个需要处理，每个文件 从 试卷答案  下一段落开始的格式不全一样，段落数量也没有固定。 简单讲就是 怎么用通配符 表示   “从 试卷答案 开始到文件结尾”

duquancai

其实你这个问题没有实际意义！我在猜想：你只是想弄明白，1、*通配符的用法；2、单词结尾>这个通配符的用法；3、文档最后一个“回车符”的实际意义。想弄清楚这三个问题才出的这个题目吧？这只是我个人的猜测而已。

你人真好

duquancai 发表于 2016-2-3 23:45
其实你这个问题没有实际意义！我在猜想：你只是想弄明白，1、*通配符的用法；2、单词结尾>这个通配符的用法 ...

多谢您的回答，哈哈。
-------------------------------------------------
1、*通配符的用法，这个我懂得。2、单词结尾>这个通配符的用法，这个我也懂得。3.文档最后一个“回车符‘ 这个不懂得。   
连在一起 怎么表达  从特定字符到 文档的最后一个回车符，这个不懂得。

zpwtl

我只知道回车符可以用^13表示。
查找：试卷答案*^13^13^13
因为你的附件最后是3个回车，所以用了3个^13就全选中了。。。笨方法

你人真好

zpwtl 发表于 2016-2-4 18:12
我只知道回车符可以用^13表示。
查找：试卷答案*^13^13^13
因为你的附件最后是3个回车，所以用了3个^13就 ...

多谢，您的回复。
------------------------------
像这种文件500多个需要处理。，试卷答案 后的格式不是太一样，段落数量也没有固定。 能确定的就是试卷答案开始到文件结尾都不要。

xwdys

用VBA试试：

1. Sub Test()
   
2.   Application.ScreenUpdating = False
   
3.   
   
4.   Selection.HomeKey Unit:=wdStory
   
5.   
   
6.   With Selection.Find
   
7.     .ClearFormatting
   
8.     .Replacement.ClearFormatting
   
9.     .Text = "试卷答案"
   
10.     .Execute
    
11.   End With
    
12.   
    
13.   With Selection
    
14.     .SetRange .Start, ActiveDocument.Content.End
    
15.     .Delete
    
16.   End With
    
17.   Application.ScreenUpdating = True
    
18. End Sub

复制代码