에 작성하는 방법 Word 2016에서 문서 정리 매크로를 작성하는 방법 - 최종 저장 전에

최종 저장 전에 또는 큰 문서에서 작업 할 때 Word 2016에서 문서 정리를 수행하십시오. 가짜 문자 및 기타 문제가있는 텍스트를 찾는 과정입니다.

문서 정리 루틴에는 단락, 이중 공백, 이중 탭 및 이중 Enter 키 (빈 단락)의 끝에 공백을 찾는 작업이 포함됩니다. 이것들은 피할 수있는 모든 항목이지만 어쨌든 긴 문서로 끝납니다.

이러한 원하지 않는 요소를 제거하는 과정은 찾기 및 바꾸기 대화 상자를 사용하는 것과 관련이 있습니다. Space, Tab 및 Enter와 같은 특수 문자를 입력하려면 특수 단추를 사용해야합니다.

문서 정리 작업을 수행하기 위해 작성된 매크로는 다양한 문자를 검색하고 바꿀 때 사용되는 키 입력을 기록했습니다. 그런 다음 Visual Basic Editor를 사용하여 중복 코드 일부를 제거했습니다. 결과는 다음과 같습니다.

후행 공백과 공백, 탭 및 Enter 키를 제거합니다.

'

선택. HomeKey 단위: = wdStory

선택. 발견. ClearFormatting

선택. 발견. 바꿔 놓음. ClearFormatting

'선택 영역이있는 단락

에서 후행 공백을 제거합니다.

찾기 - 3 ->

. 텍스트 = "^ w ^ v"

. 바꿔 놓음. 텍스트 = "^ v"

. Forward = True

End With

선택. 발견. 바꾸기 실행: = wdReplaceAll

'선택 사항과 함께 이중 공백 제거

>>를 찾으십시오. 텍스트 = ""

. 바꿔 놓음. 텍스트 = ""

선택 끝으로

선택. 발견. 바꾸기 실행: = wdReplaceAll

'선택 항목과 함께 이중 탭 제거

찾기. 텍스트 = "^ t ^ t"

. 바꿔 놓음. 텍스트 = "^ t"

선택 끝내기

선택. 발견. 바꾸기 실행: = wdReplaceAll

'선택 항목과 함께 이중 Enter 키 (빈 단락)

를 제거하십시오.

찾기. 텍스트 = "^ v ^ v"

. 바꿔 놓음. 텍스트 = "^ v"

선택으로 끝납니다. 발견. 실행 바꾸기: = wdReplaceAll

End Sub

첫 번째 검색 및 바꾸기 작업은 후행 공백을 제거합니다. 검색 텍스트는 ^ w ^ v이며, Enter 키 (^ v) 이전의 공백 (^ w) 문자를 찾습니다. 이 공백 문자 (공백, 탭 등)는 뒤에 오는 공백을 제거하는 Enter 키로 대체됩니다.

두 번째 검색 및 교체는 이중 공백을 제거합니다. 검색 텍스트에 대해 스페이스 바를 두 번 누르고 대체 텍스트에 대해 스페이스 바를 한 번 누르십시오.

세 번째로 찾기 및 바꾸기는 이중 탭을 제거합니다. ^ t는 찾기 및 바꾸기 대화 상자의 탭 문자를 나타냅니다.

마지막 search-and-replace는 빈 단락을 제거합니다. ^ v.자는 Enter 키를 나타냄니다. ^ v ^ v를 ^ v로 바꾸면 빈. 단을 제거합니다.

이 매크로는 정상적으로 작동하지만 더 좋을 수 있습니다. 예를 들어, 트리플 스페이스 또는 트리플 탭을 처리하지 않습니다. 두 번째로 매크로를 실행해야합니다. 프로그래밍 인재를 제공하면 매크로 코드가 이러한 문제를 해결할 수 있습니다.