VBA를 사용하여 악센트 부호가있는 문자를 일반 문자로 바꾸기

Excel 용 Kutools를 사용하여 악센트 부호가있는 문자를 일반 문자로 바꾸기

Microsoft Excel에 익숙한 사용자의 경우 VBA 매크로를 사용하면이 복잡한 작업을 쉽게 처리 할 수 ​​있습니다.

1. 누르고있어. 다른 + F11 Excel에서 키를 클릭하고 Microsoft Visual Basic for Applications 창.

2. 끼워 넣다 > 모듈을 클릭하고 다음 매크로를 모듈 창.

Function StripAccent(thestring As String)
Dim A As String * 1
Dim B As String * 1
Dim i As Integer
Const AccChars= "ŠŽšžŸÀÁÂÃÄÅÇÈÉÊËÌÍÎÏÐÑÒÓÔÕÖÙÚÛÜÝàáâãäåçèéêëìíîïðñòóôõöùúûüýÿ"
Const RegChars= "SZszYAAAAAACEEEEIIIIDNOOOOOUUUUYaaaaaaceeeeiiiidnooooouuuuyy"
For i = 1 To Len(AccChars)
A = Mid(AccChars, i, 1)
B = Mid(RegChars, i, 1)
thestring = Replace(thestring, A, B)
Next
StripAccent = thestring
End Function

3. 그런 다음 빈 셀로 이동하여 수식을 셀에 붙여 넣습니다. = CheckStringCHAR (InString)예를 들어, = CheckStringCHAR ( "ù")및 = CheckStringCHAR (A2).

배송 시 요청 사항:
(1) Microsoft Visual Basic이 유니 코드를 지원하지 않는 경우 악센트 부호가있는 문자를 전혀 인식하지 못할 수 있습니다. 예를 들어 Visual Basic에서 "š"를 붙여 넣으면 "?"가 표시 될 수 있습니다. 그렇다면이 매크로를 사용할 수 없습니다.
(2) 선택한 셀의 문자열에서 악센트 부호가있는 문자를 직접 대체하지 않습니다.

VBA 매크로를 사용하려면 너무 많은 기술과 지식이 필요합니다. 그리고 다음 방법을 사용하면 몇 번의 클릭만으로 작업을 더 쉽게 수행 할 수 있습니다. Excel 용 Kutools의 악센트 부호가있는 문자 바꾸기 도구를 사용하면 모든 종류의 악센트 부호가있는 문자를 일반 문자로 한 번에 쉽게 바꿀 수 있습니다.

1. 모든 악센트 부호가있는 문자를 바꿀 범위를 선택하십시오.

2. 쿠툴 > 본문 > 악센트 부호가있는 문자 바꾸기…, 스크린 샷 참조 :

3. In 악센트 부호가있는 문자 바꾸기 대화 상자에서 모두 선택 버튼을 클릭하여 모든 바꾸기 규칙을 선택하고 확인 버튼을 클릭하여 모든 악센트 부호를 바꿉니다. 스크린 샷 참조 :

노트:
(1) 원하는 특정 악센트 부호가있는 문자가없는 경우 규칙 추가 버튼을 클릭하여 위의 악센트 부호 바꾸기 대화 상자의 목록 상자에 고유 한 규칙을 추가합니다.
(2) 악센트 부호 바꾸기 대화 상자에서 새 바꾸기 규칙을 사용자 정의 할 수 있습니다.

이제 선택한 범위의 문자열에서 모든 악센트 부호가있는 문자가 즉시 일반 문자로 변환됩니다. 스크린 샷보기 :

XNUMXD덴탈의 악센트 부호가있는 문자 바꾸기 Excel 용 Kutools의 기능은 전체 통합 문서에서 모든 종류의 악센트 부호가있는 문자를 일반 문자로 쉽게 바꿀 수 있습니다. 무료 평가판을 받으십시오!