currency conversion macro

[Guest]

I want to create a macro that can check the currency and convert it to
others. For example ;
Original
A B C
John USD 100
Peter EURO 200
Charles HKD 700

Result
A B C D E
John USD 100 HKD 780
Peter EURO 2000 HKD 2000
Charles HKD 700 HKD 700

Thanks in advance.
Bond

 

[Guest]

You can do it with a lookup function

=lookup(b3,{"USD","EURO","HKD",c3*123,c3*456,c3*789}
where 123 is the conversion ratte for USD
where 456 is the conversion ratte for EURO
where 789 is the conversion ratte for HKD

 

[Guest]

Sorry, I'm a newbee. Could you write me a macro to show how it works?
Thks!

 

[Guest]

The macro is below. Put the function in column E3 ( or change th erow
number to the appropriate row). Also change the conversion rates i put in
(123, 456, 789) to the correct values.