通配符查找以句号结束的句子为什么会跨段。

菜菜行者

本打算只是查找下图画红线部分的句子，可为什么会找到第五和下面一段呢

不经意的回头

第五后面没有句号，而第十后面有句号，可以这样查找：[一二三四五六七八九十]{1,}、?{1,20}^13

菜菜行者

不经意的回头 发表于 2016-4-19 08:15
第五后面没有句号，而第十后面有句号，可以这样查找：[一二三四五六七八九十]{1,}、?{1,20}^13

可我要查找以句号结束的句子啊。
怎么办？

不经意的回头

菜菜行者 发表于 2016-4-19 13:06
可我要查找以句号结束的句子啊。
怎么办？

不好意思粗心读错题了呵呵，再看看

不经意的回头

一步做到我写不出来，弄了个两步走，你看看可以不？
第1步，在主文档中查找：[一二三四五六七八九十]{1,}、?{1,20}^13
第2步，在当前选中的文本中查找：
[一二三四五六七八九十]{1,}?{1,3}[!^l]>。
我测试是可以了

菜菜行者

不经意的回头 发表于 2016-4-19 17:14
一步做到我写不出来，弄了个两步走，你看看可以不？
第1步，在主文档中查找：[一二三四五六七八九十]{1,} ...

谢谢楼上的，手动操作可以，但录制成宏后运行不起作用，这是为什么？
Sub 一句号()
'
' 一句号 宏
'
'
    Selection.Find.ClearFormatting
    With Selection.Find
        .Text = "[一二三四五六七八九十]{1,}、?{1,20}^13"
        .Replacement.Text = ""
        .Forward = True
        .Wrap = wdFindContinue
        .Format = False
        .MatchCase = False
        .MatchWholeWord = False
        .MatchByte = False
        .MatchAllWordForms = False
        .MatchSoundsLike = False
        .MatchWildcards = True
    End With
    Selection.Find.ClearFormatting
    With Selection.Find
        .Text = "[一二三四五六七八九十]{1,}?{1,3}[!^l]>。"
        .Replacement.Text = ""
        .Forward = True
        .Wrap = wdFindAsk
        .Format = False
        .MatchCase = False
        .MatchWholeWord = False
        .MatchByte = False
        .MatchAllWordForms = False
        .MatchSoundsLike = False
        .MatchWildcards = True
    End With
End Sub

413191246se

楼主，找以句号结束的句子，想干什么呢？

duquancai

使用通配符查找，查找表达式为：”[〇一二三四五六七八九十百千万]@、[!^13]@。”（不包含引号）。vbscript中的正则查找表达式为：“[〇一二三四五六七八九十百千万]+、.+。”（不包含引号）。

菜菜行者

duquancai 发表于 2016-4-20 16:52
使用通配符查找，查找表达式为：”[〇一二三四五六七八九十百千万]@、[!^13]@。”（不包含引号）。vbscript ...

使用通配符查找比5楼的方法少一步，应该是更简单。
如果用正则表达式，一段里有2个句子也会被查找到，应该是查找第一个句子的。

谢谢啦！

菜菜行者

同时谢谢各位！
8楼的方法使我解决了问题。