如何在Word中获取VBA宏以删除仅包含找到的文本的行，但不包含包含找到的文本和其他文本的行

Question

简而言之，我发现多个问题和答案似乎只是部分内容我需要。

我需要什么会做什么，我在下面说明：

FindText ("Find me") 
If other text exists on this line Then 
With Selection.Find 
.Text = "Find me" 
.Replacement.Text = "Found you" 
.Execute Replace: [not sure what to put here] 

Else delete the entire line 

我知道这可能看起来有点古怪，但它是我被要求做一些事情，我无法找到任何答案任何地方给我我需要的东西。

编辑：要删除的行只是一行文本。它只是一个可见的行，下一行是在回车后。

该删除行下面的文档的其余部分在删除空格时应该向上移动。

Answer 1

This文章处理完全相同的问题并提供解决方案。 Here是一个SO文章，提供了另一个很好的解决方案。