Skip to main content

Kutools for Office — 하나의 패키지. 다섯 가지 도구. 더 많은 일을 처리하세요.

Excel에서 통화 숫자를 빠르게 단어로 변환하는 방법은 무엇입니까?

Author Sun Last modified

Excel에서 금융 데이터를 처리할 때 수표 금액을 적는 것처럼 통화 숫자를 단어로 변환해야 할 때가 있습니다. 불행히도 Excel에서는 이를 위한 내장 함수를 제공하지 않지만, 이를 달성하기 위한 두 가지 효과적인 방법이 있습니다. 이 문서에서는 두 가지 방법 모두를 안내하며, 필요에 따라 최선의 접근 방식을 선택할 수 있도록 도와드립니다.

Example of currency numbers in Excel converted to words

VBA 코드를 사용하여 통화 숫자를 단어로 표시하기

Kutools for Excel을 사용하여 통화 숫자를 단어로 표시하기 good idea3

VBA 코드를 사용하여 통화 숫자를 단어로 표시하기

Excel에서는 VBA를 제외하고 숫자를 영어 단어로 빠르게 변환할 수 없습니다.

1. "Alt + F11" 키를 눌러 "Microsoft Visual Basic for Application" 창을 엽니다.

2. "삽입" > "모듈"을 클릭하고 아래 VBA를 새 모듈 창에 붙여넣습니다.

VBA: 통화 숫자를 영어 단어로 변환하기

Function SpellNumberToEnglish(ByVal pNumber)
'Updateby20131113
Dim Dollars, Cents
arr = Array("", "", " Thousand ", " Million ", " Billion ", " Trillion ")
pNumber = Trim(Str(pNumber))
xDecimal = InStr(pNumber, ".")
If xDecimal > 0 Then
    Cents = GetTens(Left(Mid(pNumber, xDecimal + 1) & "00", 2))
    pNumber = Trim(Left(pNumber, xDecimal - 1))
End If
xIndex = 1
Do While pNumber <> ""
    xHundred = ""
    xValue = Right(pNumber, 3)
    If Val(xValue) <> 0 Then
        xValue = Right("000" & xValue, 3)
        If Mid(xValue, 1, 1) <> "0" Then
            xHundred = GetDigit(Mid(xValue, 1, 1)) & " Hundred "
        End If
        If Mid(xValue, 2, 1) <> "0" Then
            xHundred = xHundred & GetTens(Mid(xValue, 2))
        Else
            xHundred = xHundred & GetDigit(Mid(xValue, 3))
        End If
    End If
    If xHundred <> "" Then
        Dollars = xHundred & arr(xIndex) & Dollars
    End If
    If Len(pNumber) > 3 Then
        pNumber = Left(pNumber, Len(pNumber) - 3)
    Else
        pNumber = ""
    End If
    xIndex = xIndex + 1
Loop
Select Case Dollars
    Case ""
        Dollars = "No Dollars"
    Case "One"
        Dollars = "One Dollar"
    Case Else
        Dollars = Dollars & " Dollars"
End Select
Select Case Cents
    Case ""
        Cents = " and No Cents"
    Case "One"
        Cents = " and One Cent"
    Case Else
        Cents = " and " & Cents & " Cents"
End Select
SpellNumberToEnglish = Dollars & Cents
End Function
Function GetTens(pTens)
Dim Result As String
Result = ""
If Val(Left(pTens, 1)) = 1 Then
    Select Case Val(pTens)
        Case 10: Result = "Ten"
        Case 11: Result = "Eleven"
        Case 12: Result = "Twelve"
        Case 13: Result = "Thirteen"
        Case 14: Result = "Fourteen"
        Case 15: Result = "Fifteen"
        Case 16: Result = "Sixteen"
        Case 17: Result = "Seventeen"
        Case 18: Result = "Eighteen"
        Case 19: Result = "Nineteen"
        Case Else
    End Select
Else
Select Case Val(Left(pTens, 1))
    Case 2: Result = "Twenty "
    Case 3: Result = "Thirty "
    Case 4: Result = "Forty "
    Case 5: Result = "Fifty "
    Case 6: Result = "Sixty "
    Case 7: Result = "Seventy "
    Case 8: Result = "Eighty "
    Case 9: Result = "Ninety "
    Case Else
End Select
Result = Result & GetDigit(Right(pTens, 1))
End If
GetTens = Result
End Function
Function GetDigit(pDigit)
Select Case Val(pDigit)
    Case 1: GetDigit = "One"
    Case 2: GetDigit = "Two"
    Case 3: GetDigit = "Three"
    Case 4: GetDigit = "Four"
    Case 5: GetDigit = "Five"
    Case 6: GetDigit = "Six"
    Case 7: GetDigit = "Seven"
    Case 8: GetDigit = "Eight"
    Case 9: GetDigit = "Nine"
    Case Else: GetDigit = ""
End Select
End Function

3. 그런 다음 이 코드를 저장하고 창을 닫아 워크시트로 돌아가서 빈 셀을 선택하고 이 공식을 입력합니다: =SpellNumberToEnglish(A2) (A2는 통화 숫자입니다), Enter 키를 누른 후, 이 공식을 필요한 셀에 적용하도록 드래그합니다. 스크린샷 보기:

Example of using SpellNumberToEnglish formula to convert currency number to words in Excel
Arrow down
Example of currency numbers in Excel converted to words

손쉬운 Spell Out Numbers 기능으로 통화 숫자를 단어로 표시하기

VBA를 사용하기 싫은 분들을 위해 Kutools for Excel은 숫자를 단어로 변환하는 간단한 한 번의 클릭 방식을 제공합니다. Kutools for Excel의 "Numbers to Words" 기능은 40개 이상의 다양한 통화 형식으로 숫자를 변환하는 것을 지원하며, 이는 재무 보고 및 국제 거래에 이상적인 솔루션입니다. 몇 번의 클릭만으로 사용자는 USD, EUR, GBP, JPY, CNY 등 여러 언어로 완전히 서식화된 통화 텍스트로 숫자 값을 변환할 수 있으며, 수동 변환의 필요성을 없애고 오류를 줄일 수 있습니다.

Kutools for Excel은 300개 이상의 고급 기능을 제공하여 복잡한 작업을 간소화하고 창의성과 효율성을 향상시킵니다. AI 기능과 통합되어 Kutools는 정확하게 작업을 자동화하며, 데이터 관리를 손쉽게 만듭니다. Kutools for Excel의 상세 정보...무료 체험하기...

1. 통화 숫자를 선택하고 "Kutools" > "텍스트" > "Numbers to Words"를 클릭합니다. 스크린샷 보기:

Screenshot showing Numbers to Words option in Kutools Content menu in Excel

2. "Numbers to Currency Words" 대화상자에서 사용할 언어를 선택합니다; 여기서는 "언어 이름" 목록 상자에서 "영어" 옵션을 선택하겠습니다. 스크린샷 보기:

Screenshot showing Numbers to Currency Words dialog with English and Chinese options

3. "확인" 또는 "적용"을 클릭합니다. 그러면 선택한 통화 숫자가 특정 통화 단어로 변환됩니다.

Screenshot of currency numbers converted to English words using Kutools

📌 참고: 이 Numbers to Words 기능을 적용하기 전에 통화 숫자를 다른 워크시트에 복사하여 붙여넣을 수 있습니다.

Excel에서 통화 숫자를 단어로 변환하는 작업은 VBA 또는 Kutools for Excel 중 하나를 사용하여 효율적으로 수행할 수 있습니다. 이러한 방법 중 하나를 구현함으로써 재무 보고를 자동화하고 수작업 타이핑 오류를 제거할 수 있습니다. Excel 팁과 트릭을 더 탐구하고 싶다면 우리 웹사이트는 여러분이 Excel을 마스터하는 데 도움이 되는 수천 개의 튜토리얼을 제공합니다.

데모: Kutools for Excel을 사용하여 통화 숫자를 단어로 변환하기

 
Kutools for Excel: 손끝에서 바로 사용할 수 있는 300개 이상의 유용한 도구들! 영구적으로 무료인 AI 기능을 즐기세요! 지금 다운로드하세요!

최고의 오피스 생산성 도구

🤖 Kutools AI 도우미: 데이터 분석에 혁신을 가져옵니다. 방법: 지능형 실행   |  코드 생성  |  사용자 정의 수식 생성  |  데이터 분석 및 차트 생성  |  Kutools Functions 호출…
인기 기능: 중복 찾기, 강조 또는 중복 표시   |  빈 행 삭제   |  데이터 손실 없이 열 또는 셀 병합   |   반올림(수식 없이) ...
슈퍼 LOOKUP: 다중 조건 VLOOKUP  |   다중 값 VLOOKUP  |   다중 시트 조회   |   퍼지 매치 ....
고급 드롭다운 목록: 드롭다운 목록 빠르게 생성   |  종속 드롭다운 목록   |  다중 선택 드롭다운 목록 ....
열 관리자: 지정한 수의 열 추가  |  열 이동  |  숨겨진 열의 표시 상태 전환  |  범위 및 열 비교 ...
추천 기능: 그리드 포커스   |  디자인 보기   |   향상된 수식 표시줄   |  통합 문서 & 시트 관리자   |  자동 텍스트 라이브러리   |  날짜 선택기   |  데이터 병합   |  셀 암호화/해독   |  목록으로 이메일 보내기   |  슈퍼 필터   |   특수 필터(굵게/이탤릭/취소선 필터 등) ...
15대 주요 도구 세트: 12 가지 텍스트 도구(텍스트 추가, 특정 문자 삭제, ...)  |  50+ 종류의 차트(간트 차트, ...)  |  40+ 실용적 수식(생일을 기반으로 나이 계산, ...)  |  19 가지 삽입 도구(QR 코드 삽입, 경로에서 그림 삽입, ...)  |  12 가지 변환 도구(단어로 변환하기, 통화 변환, ...)  |  7 가지 병합 & 분할 도구(고급 행 병합, 셀 분할, ...)  |  ... 등 다양
Kutools는 사용자가 선호하는 언어로 이용할 수 있습니다 – 영어, 스페인어, 독일어, 프랑스어, 중국어 및40개 이상의 언어 지원!

Kutools for Excel과 함께 엑셀 능력을 한 단계 끌어 올리고, 이전에 없던 효율성을 경험하세요. Kutools for Excel은300개 이상의 고급 기능으로 생산성을 높이고 저장 시간을 단축합니다.  가장 필요한 기능을 바로 확인하려면 여기를 클릭하세요...

Office Tab은 Office에 탭 인터페이스를 제공하여 작업을 더욱 간편하게 만듭니다

  • Word, Excel, PowerPoint에서 탭 편집 및 읽기를 활성화합니다.
  • 새 창 대신 같은 창의 새로운 탭에서 여러 파일을 열고 생성할 수 있습니다.
  • 생산성이50% 증가하며, 매일 수백 번의 마우스 클릭을 줄여줍니다!

모든 Kutools 추가 기능. 한 번에 설치

Kutools for Office 제품군은 Excel, Word, Outlook, PowerPoint용 추가 기능과 Office Tab Pro를 한 번에 제공하여 Office 앱을 활용하는 팀에 최적입니다.

Excel Word Outlook Tabs PowerPoint
  • 올인원 제품군 — Excel, Word, Outlook, PowerPoint 추가 기능 + Office Tab Pro
  • 설치 한 번, 라이선스 한 번 — 몇 분 만에 손쉽게 설정(MSI 지원)
  • 함께 사용할 때 더욱 효율적 — Office 앱 간 생산성 향상
  • 30일 모든 기능 사용 가능 — 회원가입/카드 불필요
  • 최고의 가성비 — 개별 추가 기능 구매 대비 절약