>source

Word 2013 문서에서 제목 검색/대체를 자동화하려고합니다 (이는 Word 스타일 제목이 아니라 단순히 콜론으로 대문자로 입력 된 텍스트입니다). 예를 들면 다음과 같습니다.

CHIEF 불만 사항 :

물리 검사 :

검색 및 바꾸기는 제목을 굵게 표시하는 것입니다. 그렇지 않으면 수동으로 수행해야합니다. 그렇지 않으면 제목 텍스트는 동일하게 유지됩니다. 문서에 어떤 제목이 있는지 (또는 전혀없는 경우), 순서 또는 문서의 첫 줄에 제목이 포함되는지 여부를 알 수있는 방법이 없습니다.

수동 검색/대체 : ^ 13 (* :)

이것에 : ^ p \ 1

첫 번째 인스턴스가 파일의 시작 부분에있는 경우를 제외하고 작동합니다 (반환하지 않음).

내가 사용한 매크로는 다음과 같다 :

Sub BoldHeadings()
'
' BoldHeadings Macro
'
Application.ScreenUpdating = False
With ActiveDocument.Range.Find
  .ClearFormatting
  .Replacement.ClearFormatting
  .Format = False
  .Forward = True
  .MatchWildcards = True
  .Wrap = wdFindContinue
  .Text = "^13(*:)"
  .Replacement.Text = "^p\1"
  .Replacement.Font.Bold = True
  .Execute Replace:=wdReplaceAll
  .Replacement.ClearFormatting
End With
Application.ScreenUpdating = True
End Sub

언급했듯이 첫 번째 인스턴스가 파일의 시작 부분에있는 경우를 제외하고는 정상적으로 작동합니다. 이것을 달성 할 수있는 다른 방법이 있습니까?

감사합니다!

  • 이전 자바 스크립트를 통해 HTML로 JSON 문자열 표시
  • 다음 Microsoft Azure에서 만든 Windows Server 2016 도메인 컨트롤러에 가입하려면 Windows 10 Pro에 어떤 네트워크 설정이 필요합니까?