Format to Euro instead of Dollar

  • Thread starter Thread starter Guest
  • Start date Start date
G

Guest

Why is this not working? I am trying to convert a number to euros and display
it as such.

format([Rate]* 1.25,"Euro")
the result comes up Euro instead of the number with the euro sign

If I use format([Rate]* 1.25,"Currency") it displays the number with a $ sign.
 
Holly,

Here's one way, although it may not provide the precision you desire:

= Format([Rate]*1.25, "Fixed") & " " & Chr(128)
output = 0.00 ?

On the other hand, "Euro" is an available Format option on the property
sheet.

HTH,
Brian


Holly said:
Why is this not working? I am trying to convert a number to euros and display
it as such.

format([Rate]* 1.25,"Euro")
the result comes up Euro instead of the number with the euro sign

If I use format([Rate]* 1.25,"Currency") it displays the number with a $
Click to expand...
sign.
 
Well, unfortunately the Euro sign didn't show correctly in my post. But it
does work.
And for more currency symbols:

' Chr(036) = USD
' Chr(163) = GBP
' Chr(128) = EUR
' Chr(165) = YEN

Brian


Brian Bastl said:
Holly,

Here's one way, although it may not provide the precision you desire:

= Format([Rate]*1.25, "Fixed") & " " & Chr(128)
output = 0.00 ?

On the other hand, "Euro" is an available Format option on the property
sheet.

HTH,
Brian


Holly said:
Why is this not working? I am trying to convert a number to euros and display
it as such.

format([Rate]* 1.25,"Euro")
the result comes up Euro instead of the number with the euro sign

If I use format([Rate]* 1.25,"Currency") it displays the number with a $
Click to expand...
sign.
Click to expand...
 
It appears that, while the Euro format is available from the property sheet,
it has not been added to the list of named formats that are recognized by
VBA. Which means that if you need to set the format programmatically, you'll
need to use a custom format such as the one that Brian suggests elsewhere in
this thread.
 
Alternatively ...

While "Euro" doesn't work with the Format *function* it does work with the
Format *property*. For example ...

Private Sub Form_Open(Cancel As Integer)
Me.EmployeeID.Format = "Euro"
End Sub

(I know, it doesn't make sense to display an Employee ID as a Euro amount,
but I needed a non-currency field for testing purposes, because on my system
Currency *is* Euro.)

--
Brendan Reynolds
Access MVP

Brendan Reynolds said:
It appears that, while the Euro format is available from the property
sheet, it has not been added to the list of named formats that are
recognized by VBA. Which means that if you need to set the format
programmatically, you'll need to use a custom format such as the one that
Brian suggests elsewhere in this thread.

--
Brendan Reynolds
Access MVP


Holly said:
Why is this not working? I am trying to convert a number to euros and
display
it as such.

format([Rate]* 1.25,"Euro")
the result comes up Euro instead of the number with the euro sign

If I use format([Rate]* 1.25,"Currency") it displays the number with a $
sign.
Click to expand...
Click to expand...
 
Hi Brendan,

thanks for that. It hadn't occurred to me to try it that way. Unfortunately
with US regional settings, the Euro symbol will still preceed the currency
amount, as opposed to how the OP wanted it formatted.

Brian


Brendan Reynolds said:
Alternatively ...

While "Euro" doesn't work with the Format *function* it does work with the
Format *property*. For example ...

Private Sub Form_Open(Cancel As Integer)
Me.EmployeeID.Format = "Euro"
End Sub

(I know, it doesn't make sense to display an Employee ID as a Euro amount,
but I needed a non-currency field for testing purposes, because on my system
Currency *is* Euro.)

--
Brendan Reynolds
Access MVP

Brendan Reynolds said:
It appears that, while the Euro format is available from the property
sheet, it has not been added to the list of named formats that are
recognized by VBA. Which means that if you need to set the format
programmatically, you'll need to use a custom format such as the one that
Brian suggests elsewhere in this thread.

--
Brendan Reynolds
Access MVP


Holly said:
Why is this not working? I am trying to convert a number to euros and
display
it as such.

format([Rate]* 1.25,"Euro")
the result comes up Euro instead of the number with the euro sign

If I use format([Rate]* 1.25,"Currency") it displays the number with a $
sign.
Click to expand...
Click to expand...
Click to expand...
 
I think you may be misreading the original post, Brian. Of course, I could
be wrong.

--
Brendan Reynolds
Access MVP

Brian Bastl said:
Hi Brendan,

thanks for that. It hadn't occurred to me to try it that way.
Unfortunately
with US regional settings, the Euro symbol will still preceed the currency
amount, as opposed to how the OP wanted it formatted.

Brian


Brendan Reynolds said:
Alternatively ...

While "Euro" doesn't work with the Format *function* it does work with
the
Format *property*. For example ...

Private Sub Form_Open(Cancel As Integer)
Me.EmployeeID.Format = "Euro"
End Sub

(I know, it doesn't make sense to display an Employee ID as a Euro
amount,
but I needed a non-currency field for testing purposes, because on my system
Currency *is* Euro.)

--
Brendan Reynolds
Access MVP

Brendan Reynolds said:
It appears that, while the Euro format is available from the property
sheet, it has not been added to the list of named formats that are
recognized by VBA. Which means that if you need to set the format
programmatically, you'll need to use a custom format such as the one that
Brian suggests elsewhere in this thread.

--
Brendan Reynolds
Access MVP


Why is this not working? I am trying to convert a number to euros and
display
it as such.

format([Rate]* 1.25,"Euro")
the result comes up Euro instead of the number with the euro sign

If I use format([Rate]* 1.25,"Currency") it displays the number with a $
sign.
Click to expand...
Click to expand...
Click to expand...
 
Ah, you could be right! It's just that it would seem awfully strange for me
to see the Euro sign in front. Don't know which country you're in, but
wouldn't that be how your currency is displayed?

Brian


Brendan Reynolds said:
I think you may be misreading the original post, Brian. Of course, I could
be wrong.

--
Brendan Reynolds
Access MVP

Brian Bastl said:
Hi Brendan,

thanks for that. It hadn't occurred to me to try it that way.
Unfortunately
with US regional settings, the Euro symbol will still preceed the currency
amount, as opposed to how the OP wanted it formatted.

Brian


Brendan Reynolds said:
Alternatively ...

While "Euro" doesn't work with the Format *function* it does work with
the
Format *property*. For example ...

Private Sub Form_Open(Cancel As Integer)
Me.EmployeeID.Format = "Euro"
End Sub

(I know, it doesn't make sense to display an Employee ID as a Euro
amount,
but I needed a non-currency field for testing purposes, because on my system
Currency *is* Euro.)

--
Brendan Reynolds
Access MVP

It appears that, while the Euro format is available from the property
sheet, it has not been added to the list of named formats that are
recognized by VBA. Which means that if you need to set the format
programmatically, you'll need to use a custom format such as the one that
Brian suggests elsewhere in this thread.

--
Brendan Reynolds
Access MVP


Why is this not working? I am trying to convert a number to euros and
display
it as such.

format([Rate]* 1.25,"Euro")
the result comes up Euro instead of the number with the euro sign

If I use format([Rate]* 1.25,"Currency") it displays the number with
Click to expand...
a
$
sign.
Click to expand...
Click to expand...
Click to expand...
 
I'm in Ireland, which is part of the Euro-zone, and symbol-first is the
standard here. But as the (I think?) only English-speaking country in the
Euro-zone, we may be the odd-ones-out! :-)

--
Brendan Reynolds
Access MVP

Brian Bastl said:
Ah, you could be right! It's just that it would seem awfully strange for
me
to see the Euro sign in front. Don't know which country you're in, but
wouldn't that be how your currency is displayed?

Brian


Brendan Reynolds said:
I think you may be misreading the original post, Brian. Of course, I
could
be wrong.

--
Brendan Reynolds
Access MVP

Brian Bastl said:
Hi Brendan,

thanks for that. It hadn't occurred to me to try it that way.
Unfortunately
with US regional settings, the Euro symbol will still preceed the currency
amount, as opposed to how the OP wanted it formatted.

Brian


message
Alternatively ...

While "Euro" doesn't work with the Format *function* it does work with
the
Format *property*. For example ...

Private Sub Form_Open(Cancel As Integer)
Me.EmployeeID.Format = "Euro"
End Sub

(I know, it doesn't make sense to display an Employee ID as a Euro
amount,
but I needed a non-currency field for testing purposes, because on my
system
Currency *is* Euro.)

--
Brendan Reynolds
Access MVP

It appears that, while the Euro format is available from the
property
sheet, it has not been added to the list of named formats that are
recognized by VBA. Which means that if you need to set the format
programmatically, you'll need to use a custom format such as the one
that
Brian suggests elsewhere in this thread.

--
Brendan Reynolds
Access MVP


Why is this not working? I am trying to convert a number to euros and
display
it as such.

format([Rate]* 1.25,"Euro")
the result comes up Euro instead of the number with the euro sign

If I use format([Rate]* 1.25,"Currency") it displays the number
with a
$
sign.
Click to expand...
Click to expand...
Click to expand...
 
Back
Top