特定の文字列を含むすべての行を削除します

Question

私はMicrosoft Word 2010を使用しています。

私は何千ものページにまたがる文書を持っています。文字列mystringで始まるすべての段落を削除するマクロを記述する必要があります。どのように私はこれを書くだろうか？

EDIT：カーソルを段落の先頭に置いたら、マクロを書く方法と段落を削除する方法を理解しました。私は "検索"検索を行う方法を見つける必要があります

Answer 1

Dim d As Document 
Dim p As Paragraph 

Set d = ActiveDocument 

For Each p In d.Paragraphs 
    If Left(p.Range, Len("Asdfsadfsdsd")) = "Asdfsadfsdsd" Then 
     p.Range.Delete 
    End If 
Next p