MS Word에서 모든 제목의 끝에 매크로를 적용하는 방법은 무엇입니까?

Question

다양한 제목이있는 문서가 있습니다 (단, 제목 1 또는 제목 2는 아니지만 모든 유형의 제목).

내가하려는 것은 예를 들어, 각 제목의 끝에 2 공백을 삭제하는 매크로를 작성하는 것입니다.

예를 들어, 우리는

이

이있는 제목의 끝에서

을 향하고, 내가 할 것 :이 필요

Selection.Delete Unit:=wdCharacters, Count:=2 

각 제목의 끝 부분에 적용 할을 .

누구든지이 작업을 수행하는 방법을 알고 있습니까?

Answer 1

고토 첫번째 제목 :

Selection.GoTo What:=wdGoToHeading,Which:=wdGoToFirst 

고토 다음 제목

Selection.GoTo What:=wdGoToHeading,Which:=wdGoToNext 

확인 당신이 마지막 제목에 도달 한 경우 볼 수 있습니다 : 현재의

x=Selection.Start 
    Selection.GoTo What:=wdGoToHeading,Which:=wdGoToNext 
    if x = Selection.Start then '... last heading reachd 

고토의 끝을 제목 (예 : 문자 삭제) :

Selection.EndKey Unit:=wdLine