엑셀에서 숫자로 된 금액을 한글로 표시하고 싶은 경우가 있습니다. 예를 들어, 1000000원을 "일백만 원"이라고 쓰고 싶다면 어떻게 해야 할까요? 엑셀에는 이런 기능을 제공하는 함수가 없습니다. 하지만, 사용자 정의 함수를 만들어서 쉽게 해결할 수 있습니다. 이번 포스트에서는 엑셀 금액을 한글로 변환하는 방법에 대해 알아보겠습니다.
사용자 정의 함수 만들기
위와 같은 문제는 엑셀에서 사용자 정의 함수를 만들어서 해결하실 수 있습니다.
우선 Alt + F11 키를 눌러서 VBA 편집기를 엽니다.
- 삽입 메뉴에서 모듈을 선택합니다.
- 새로운 모듈 창이 열리면 다음과 같은 코드를 입력합니다.
vba
Function KORNUM(num As Double) As String
Dim numstr As String
Dim korstr As String
Dim unit(4) As String
Dim i As Integer
numstr = Format(num, "000000000000000")
unit(0) = "원"
unit(1) = "십백천"
unit(2) = "만억조"
unit(3) = "경해"
unit(4) = " "
For i = 0 To 14
If Mid(numstr, 15 - i, 1) <> "0" Then
korstr = Mid("일이삼사오육칠팔구", Val(Mid(numstr, 15 - i, 1)), 1) & Mid(unit(1), (i Mod 4) + 1, 1) & korstr
End If
If i Mod 4 = 0 Then
korstr = Mid(unit(2), (i \ 4) + 1, 1) & korstr
End If
Next i
KORNUM = Trim(korstr)
End Function
- 파일 메뉴에서 모듈 저장을 선택합니다.
- Alt + Q 키를 눌러서 VBA 편집기를 닫습니다.
사용자 정의 함수 사용하기
이제 엑셀에서 사용자 정의 함수를 사용할 수 있습니다. 예를 들어, A1 셀에 1000000이라고 입력하고, B1 셀에 =KORNUM(A1)
이라고 입력하면, B1 셀에는 "일백만 원"이라고 표시됩니다.
※ 함수 맨 처음에 있는 KORNUM부분은 함수의 이름을 말하며, 위 예시처럼 이 이름을 써주고, 바꾸고 싶은 금액이 있는 셀을 괄호 안에 넣어주면 됩니다.
이렇게 하면 엑셀에서 숫자로 된 금액을 한글로 변환할 수 있습니다. 다른 숫자도 마찬가지로 적용할 수 있습니다.
이번 포스트에서는 엑셀 금액을 한글로 변환하는 방법에 대해 알아보았습니다. 사용자 정의 함수를 만들어서 간단하게 해결할 수 있습니다. 엑셀에서 한글로 된 금액을 필요로 하시는 분들께 도움이 되었으면 좋겠습니다. 감사합니다.
'알면 되움되는 정보' 카테고리의 다른 글
코로나19 4급 감염병으로 하향 조정 (0) | 2023.08.23 |
---|---|
엑셀 날짜 자동 변환 하는 법 (0) | 2023.08.19 |
베드버그: 유럽 여행 시 가장 짜증나는 해충 (0) | 2023.08.16 |
아파트 철근의 역할과 중요한 이유 (0) | 2023.08.16 |
수박껍질 일반쓰레기 분리수거 버리는법 (0) | 2023.08.15 |
댓글