Set Currency - WON in Marco

L

Lok Tak Cheong

Our company have a Korea Branch, I attempt to set a Macro for WON, but it
does not work. When I run the macro, it reveals "?4,455". (if the cell is
4455)

Attach please find the macro.

Sub WON()
'
' WON Macro
' Macro recorded 2/16/2005 by Lok Tak Cheong
'

'
Selection.NumberFormatLocal = "[$-412]#,##0_);([$?-412]#,##0)"
End Sub
 
J

Jasper

Here you are;

Sub WON()
'
' WON Macro
' Macro recorded 2/16/2005 by Lok Tak Cheong

Selection.NumberFormatLocal = "[$WON -412]#,##0_);([$WON -412]#,##0)"
End Sub
 
J

Jasper

I tested it; it worked. Let me know if this is what you looked for,
Groeten,

Jasper

Sub WON()

K = "?"
Selection.NumberFormatLocal = "[$ " & K & " -412]#,##0_);([$" & K & "
-412]#,##0)"
End Sub
 
L

Lok Tak Cheong

Dear Jasper:
Thanks for yours reply but it does not work.
Anyway, thank a lot.
 
Top