View Single Post
  #2   Report Post  
Posted to microsoft.public.excel.programming
FSt1[_2_] FSt1[_2_] is offline
external usenet poster
 
Posts: 13
Default Recognize currency in a cell

On Dec 2, 5:40*pm, Marcin P wrote:
Hi,

I have a spreadsheet which uses different currencies when data are
imported. I'm looking for a method to recognize currency type used in
a cell, for example:

A1: €100 or $100, £100 and so on.

Many thanks.
Marcin


hi
currency type is formating so that is what you would be looking for.
here is a do nothing sniplet that checks for
dollars US.

Sub checkformat()
If Range("B2").NumberFormat = "$#,##0.00" Then
MsgBox "Dollars"
Else
MsgBox "NOT Dollars"
End If
End Sub

you would need to find out what your other currency formats are and
check for each one perhaps in a loop or
something.

Regards
FSt1