Interesting UDF. Thanks for this.
I tried it with cells formatted Currency with $, £, and ? and
LEFT(txet(A1),1) worked
But with Accounting, you need to test =MID(txet(A1),2,1)
best wishes
--
Bernard V Liengme
www.stfx.ca/people/bliengme
remove caps from email

"Gary''s Student" wrote in message
...
First enter this tiny UDF:

Function txet(r As Range) As String
txet = ""
If r.Count = 1 Then
txet = r.Text
End If
End Function

This function returns a text string that matches the "as seen" value.
This
means that if A1 contains:
? 12.34
then =Txet(A1) will have the Euro symbol as its first character. Then we
can test that first character:


=IF(LEFT(txet(A1),1)="?","*.61","")

Have a very pleasant weekend.
--
Gary''s Student - gsnu200713


"Colin" wrote:

Hello,

How do I write a function that only returns a value if the cell (A1) is
of
the currency Euro. I assume the If function would be used. Here is what i
want it do.

=IF(A1 is currency EURO, *0.61,"")

I'm not sure if the TYPE or CELL function is used with it or another
function.

Many thanks,
--
Thank you,

Colin.