Currencies in VBA

Hi Neil

Thank you for your question.

I would suggest you create a procedure that runs when the worksheet opens. You could prompt the user to enter their name, or some other method of identification.

You could then use a select case statement to assign the relevant formatting.

The following code sets the selection to currency and then changes the symbol to the Euro

Selection.Style = "Currency"
Selection.NumberFormat = _
"_-[$€-2] * #,##0.00_-;-[$€-2] * #,##0.00_-;_-[$€-2] * ""-""??_-;_-@_-"

Note the key marker which sets the currency value to euro.

Regards

Stephen

Hi Neil

Thank you for your question.

I would suggest you create a procedure that runs when the worksheet opens. You could prompt the user to enter their name, or some other method of identification.

You could then use a select case statement to assign the relevant formatting.

I have attached a text document that contains the code required to format a number as currency in euros

Regards

Stephen