☰

다양한 통화에 대한 형식 지정

tag-icon • tag-icon microsoft-excel vba
다양한 통화에 대한 형식 지정

여러 통화에 대한 조건부 형식을 지정하는 영리한 방법을 아는 사람이 있나요? 조건부 서식 수식을 사용하고 이를 모두 프로그래밍할 수 있다는 것을 알고 있지만 서식을 지정할 통화는 154개입니다. VBA 솔루션이나 과거에 사용했던 다른 영리한 솔루션이 있는지 궁금합니다. 감사해요!

답변1

추가 정보가 없으면 시작해야 합니다.

Sub Macro1()
' I will assume you have something like "GBP", "USD", in column D. Next to that cell is a currency amount.
' This will look at the cell in column D, and apply the appropriate format.

Dim rng As Range, cel As Range
Set rng = Range("E1:E10")
For Each cel In rng
    Select Case cel.Offset(0, -1).Value
    Case "USD"
        cel.NumberFormat = "$#,##0.00"
    Case "GBP"
        cel.NumberFormat = "£#,##0.00"
    End Select
Next cel

End Sub

조건부 서식은 아니지만 조금 더 빠르게 실행될 수 있습니다. 조건부 서식을 원하시면 알려주시면 조정할 수 있습니다. 더 많은 통화를 추가하는 방법을 확인해야 합니다. 셀의 통화를 결정하는 다른 방법이 있는 경우 알려주시면 업데이트해 드리겠습니다. 또한 이미 가지고 있는 수식/매크로와 사용하려는 통화에 대한 자세한 내용을 사용하여 OP를 업데이트하세요.

관련 정보