convert P/L worksheet from USD to CND

[I. Yaffie]

Looking for a short cut to convert worksheet from US currency to Canadian currency and back.

 

[Jack in the UK]

Ok seems ok could do UDF if needed

Sorry im UK as you might guess

US ?? Canada ?? USD $$$$ or an i wrong, sorry buddy if so whats the difference Jacques Vilernerve in french canada and US the same just canada $$ and US $$$, or is it like EURO and GBP a little different

What you after buddy

Jack

 

[Nimrod]

Here's a piece of code that I just wrote quickly.
It will prompt you for a conversion number and then multiply all values in the active sheet by that amount . This would allow you to convert from any type of monitary system to another.

Public Sub ConvertAmonts()
ConvNum = InputBox("Type in Conversion Number", "Conversion Number")
For Each c In ActiveSheet.Cells.SpecialCells(xlCellTypeConstants, xlNumbers)
c.Value = c.Value * ConvNum
Next
End Sub
_________________
<font size=-1>NOTE:</font.<font size=-1> (Testing performed on Win2K utilizing Office 2000. Solutions may need tweaking for other versions.)</font><font size=+1><font color="blue">Adieu,<font color="red">N<font color="blue">imrod</font
This message was edited by Nimrod on 2003-01-05 18:32

 

[Jack in the UK]

Nimrod buddy

Check your PM! Perfection

Jack