Atoz'un cevabına ek olarak, fonksiyonu aşağıdaki ile değiştirerek kullanabilirsiniz.

Function Donustur(doviz)

On Error GoTo hata



    doviz = Replace(doviz, "EUR", "€")

    doviz = Replace(doviz, "USD", "$")

    doviz = Replace(doviz, "GBP", "£")

    Donustur = doviz

hata:

If Err.Number = 0 Or Err.Number = 94 Then

Resume Next

End If

End Function