이 기사에서는 Word 문서에서 특정 글꼴을 대체하는 쉽고 효과적인 3 가지 방법을 보여 드리고자합니다.
Word에서 문서를 처리하려면 종종 편집 이상의 것이 필요합니다. 예를 들어, 스타일, 페이지 레이아웃 등과 같은 요소도 고려해야합니다. 그리고 모든 종류 중 하나는 글꼴 사용입니다. 글꼴을 자주 다른 글꼴로 변경할 가능성이 있으므로 여기에 작업을 쉽게 처리 할 수있는 세 가지 방법이 있습니다.
방법 1 : "찾기 및 바꾸기"기능 사용
- 첫 번째와 포름ost, "홈"탭을 클릭합니다.
- 그런 다음 "Editing"그룹에서 "Replace"를 클릭합니다.
- 다음으로 "찾기 및 바꾸기"대화 상자에서 "바꾸기"탭 아래에 있는지 확인합니다. "찾을 내용"상자에 삽입 포인터를 놓고 비어 있는지 확인합니다.
- 더 많은 옵션을 확장하려면 왼쪽 아래 모서리에있는 "더보기"버튼을 클릭합니다.
- 이제 먼저 "포맷"을 클릭합니다.
- 그런 다음 "글꼴"을 선택하여 "글꼴 찾기"상자를 엽니 다.
- 바꿀 "글꼴"유형을 선택합니다.
- 다음으로 "확인"을 클릭합니다.
- 그런 다음 "바꿀 내용"텍스트 상자에 삽입 포인터를 놓고 단일 문자가 없는지 확인합니다.
- 5 단계와 6 단계를 반복합니다. 이번에는 "글꼴 찾기"상자에서 교체 할 글꼴을 선택해야합니다. 그런 다음 "확인"을 클릭합니다.
- 마지막으로 "찾기 및 바꾸기"상자에서 "모두 바꾸기"를 클릭합니다.
방법 2 : 매크로를 사용하여 한 문서에서 글꼴 바꾸기
- 먼저 "Alt + F11"을 눌러 Word VBA 편집기를 트리거합니다.
- 그런 다음 "Normal"을 클릭 한 다음 "Insert"를 클릭합니다.
- "일반"프로젝트 아래에 새 모듈을 삽입하려면 "모듈"을 선택합니다.
- 다음으로 두 번 클릭하여 편집 공간을 엽니 다.
- 여기에 다음 코드를 붙여 넣으십시오.
Sub ReplaceFontForOneDocument()
Dim objSingleWord As Range
Dim objDoc As Document
Set objDoc = ActiveDocument
With objDoc
For Each objSingleWord In .Words
If objSingleWord.Font.Name = "Calibri" Then
objSingleWord.Font.Name = "Times New Roman"
End If
Next
End With
End Sub
- 마지막으로“실행”버튼을 클릭하는 것을 잊지 마십시오.
배송 시 요청 사항:
- 코드 라인에서“objSingleWord.Font.Name = "Calibri"이면”,“돋움”를 더 이상 필요하지 않은 문서의 글꼴 유형으로 표시합니다.
- 코드 라인에서“Font.Name = "Times New Roman"”, 변경“타임즈 새로운 로마”를 파일에 적용 할 글꼴로 선택합니다.
방법 3 : 매크로를 실행하여 여러 문서의 글꼴 바꾸기
앞서 언급 한 두 가지 방법은 모두 하나의 문서에서 글꼴을 바꾸는 방법에 대해 설명합니다. 이제 여러 문서에서 글꼴을 바꾸는 방법을 살펴 보겠습니다. 물론 여기서 해결책은 Word 매크로를 실행하는 것입니다.
- 우선, 모든 준비 tar하나의 폴더에 문서를 가져옵니다.
- 그런 다음 Word를 열고 VBA 편집기를 트리거하고 방법 2의 단계를 사용하여 코드 편집 공간을 엽니 다.
- 다음으로 다음 코드를 붙여 넣으십시오.
Sub BatchReplaceFont()
Dim objDoc As Document
Dim objSingleWord As Range
Dim strFile As String, strFolder As String
'Initialization
strFolder = "C:\Users\Test\Desktop\test files\"
strFile = Dir(strFolder & "*.docx", vbNormal)
'Replace a specific font with another in all files under the same folder.
While strFile <> ""
Set objDoc = Documents.Open(FileName:=strFolder & strFile)
For Each objSingleWord In objDoc.Words
If objSingleWord.Font.Name = "Calibri" Then
objSingleWord.Font.Name = "Time New Roman"
End If
Next objSingleWord
objDoc.Save
objDoc.Close
strFile = Dir()
Wend
End Sub
- 마침내 "실행"버튼을 누르십시오.
노트:
- "Calibri"는 필요하지 않은 글꼴이고 "Time New Roman"은 원하는 글꼴입니다.
- 코드 라인에서“strFolder =“C : \ Users \ Test \ Desktop \ test files \”","C : \ Users \ Test \ Desktop \ test 파일 \”는 폴더 경로를 나타냅니다. 그리고 마지막 "\”경로를 따릅니다.
놀라운 단어 오류 수정
오류는 때때로 Word에 나타날 수 있습니다. 그리고 그 결과는 우리의 Word 파일에 치명적입니다. Word의 놀라운 붕괴를 해결하는 한 가지 방법은 자주 백업하는 것입니다. 그러면 두려워 할 것이 없습니다. 또 다른 방법은 파일이 손상된 후 다시 사용하는 것입니다. Word docx 오류 복구 제품.
저자 소개 :
Vera Chen은 데이터 복구 전문가입니다. DataNumen, Inc.는 다음과 같은 데이터 복구 기술 분야의 세계적 리더입니다. 손상된 xls 복구 도구 pdf 수리 소프트웨어 제품. 자세한 내용은 WWW.datanumen.COM






