On Tue, 18 Aug 2009 17:10:01 -0700, FSPH
wrote:

Hi there,

instead of programming

Cells(Row,Column) = Number(1)
where Number(1) = 1999

I would like to indicate numbers as different currencies and make us of a
comma as the "1000 Separator". For example, "1999" should be written as "CAD
1,999".

How could I program this? What are the commands to use?

Thank you for your help.

Perhaps:

With Cells(Row, Column)
.Value = Num(1)
.NumberFormat = """CAD "" #,##0.00"
End With

--ron