word如何删除包含3个特定字符且字数不超过50的段落

hbswxs

word如何删除特定段落，该段落的特征是:包含3个特定的且不一定是在一块的字符，并且字数不超过50，

chendeyan126

如果小说天堂这四个字的顺序是不变的，可以这样做：
查找：小*说*天*堂*^13
替换（只限定为某一个标题样式）
点击全部替换。
则所以符合特征的都被设置为某一个样式。
选中该样式的所有段落删除即可。

13907933959

chendeyan126 发表于 2019-2-5 15:43
如果小说天堂这四个字的顺序是不变的，可以这样做：
查找：小*说*天*堂*^13
替换（只限定为某一个标题样 ...

这个带字数控制，恐怕不是那么简单，要功力深厚才成！

leikaiyi123

Sub test()
    With ActiveDocument.Content.Find
        Do While .Execute("小*说*天*堂*^13", , , -1)
            With .Parent
                If Len(.Paragraphs(1).Range) <= 50 Then .Paragraphs(1).Range.Delete
            End With
        Loop
    End With
End Sub

hbswxs

二楼的朋友，没有限定字数，只要一大段文字，很容易按顺序包含的小说天堂四个字，那么这一大段文字都会被删除，例如附件，

hbswxs

请问四楼？用你的代码为什么不能删除这篇文章里的字符？，

hbswxs

回复二楼，用你这种方法删除特定字符，因为没有限定字数，只要符合条件，会删除一大段文章，甚至会删除一整篇文章，一大段文字中，可能按顺序包含小说天堂四个字，例如这篇文章，，

chendeyan126

hbswxs 发表于 2019-2-14 08:16
回复二楼，用你这种方法删除特定字符，因为没有限定字数，只要符合条件，会删除一大段文章，甚至会删除一整 ...

小[!^13]@说[!^13]@天[!^13]@堂[!^13]@^13
试试这个