Word 선택 및 삭제 다음 페이지로 이동 나누기 매크로 VBA

Question

다양한 제목이있는 문서가 있습니다. 다음을 수행하고 싶습니다.

1. "제목 1"스타일에서 특정 제목을 찾으십시오.
   
2. 표제 다음의 내용을 포함하여 다음 페이지 나누기를 포함하는 제목을 삭제하십시오.
   

그래서 삭제 : 제목 + 내용 + 페이지 나누기가

내가 워드 매크로를 사용하여 텍스트를 찾을 수 있지만 난 단지 제목을 검색하는 방법을 알고하지 않는 방법을 알고있다.

는 당신의 도움이 크게 감사합니다.

Answer 1

선택 사이에서 확장을 사용 가능하게해야한다는 것을 알았습니다.

Selection.Find.ClearFormatting 
Selection.Find.Style = ActiveDocument.Styles("Heading 3") ' Search only "Heading 3" 
    With Selection.Find 
     .Text = "MIPwDMU" 
     .Forward = True 
     .Wrap = wdFindContinue 
     .Format = True 
     .MatchCase = False 
     .MatchWholeWord = False 
     .MatchWildcards = False 
     .MatchSoundsLike = False 
     .MatchAllWordForms = False 
    End With 
    Selection.Find.Execute 
    Selection.Extend 
    Selection.Find.ClearFormatting 
    With Selection.Find 
     .Text = "^m" 
     .Forward = True 
     .Wrap = wdFindAsk 
     .Format = False 
    End With 
    Selection.Find.Execute 
    Selection.Delete 

이렇게하면 제목과 페이지 나누기 사이의 모든 텍스트가 삭제됩니다.