Extract Currency Symbol from Regional Settings

[Mauritz]

Good morning

How can one extract the currency symbol from the regional settings of Windows XP to use in a string or cell entry in Excel 2003,
ie in South Africa the currency symbol is R, and say I want to create an entry in cell B3 that will read "Net Rental Rate - R/m²" based on the formula =("Net Rental Rate - ")&(Currency_Symbol)&("/m²"), I need to be able to get the letter "R" in place of the (Currency_Symbol) in the formula. I make use of a lot of custom number formating in the spreadsheet, and to change each cell every time I work in different currencies would not be viable.

Thanks

 

[arthurbr]

Hi
could you post a sample of your data?
Thx

 

[Andrew Poulsom]

Can you live with a UDF?

Function CurrencySymbol()
    CurrencySymbol = Application.International(xlCurrencyCode)
End Function

 

[Mauritz]

Hi

Thanks for the replies. UDF's are great, but the recalculation aspect bothers me, even when using "Application.Volatile" it does not always seem to recalculate and apply the new settings