PC Review


Reply
Thread Tools Rate Thread

Displaying Currency numbers (e.g. "CAD 1,999") on worksheet

 
 
FSPH
Guest
Posts: n/a
 
      19th Aug 2009
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.
 
Reply With Quote
 
 
 
 
Ron Rosenfeld
Guest
Posts: n/a
 
      19th Aug 2009
On Tue, 18 Aug 2009 17:10:01 -0700, FSPH <(E-Mail Removed)>
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
 
Reply With Quote
 
FSPH
Guest
Posts: n/a
 
      19th Aug 2009
Thank you for your input.

Fair enough, this code will allow me to write "CAD values" to the worksheet.

What do I have to do if I want to load a column in a worksheet that contains
numbers of various currencies (say, CAD and USD) which I would like to
preserve?

Price = Worksheets(Worksheet).Cells(Row, Column)

Could I assign to Price (data type Currency?) CAD or USD numbers and then
continue my calculation based on these currencies?

Thank you for your help.

"Ron Rosenfeld" wrote:

> On Tue, 18 Aug 2009 17:10:01 -0700, FSPH <(E-Mail Removed)>
> 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
>

 
Reply With Quote
 
Ron Rosenfeld
Guest
Posts: n/a
 
      20th Aug 2009
On Wed, 19 Aug 2009 15:07:01 -0700, FSPH <(E-Mail Removed)>
wrote:

>Thank you for your input.
>
>Fair enough, this code will allow me to write "CAD values" to the worksheet.
>
>What do I have to do if I want to load a column in a worksheet that contains
>numbers of various currencies (say, CAD and USD) which I would like to
>preserve?
>
>Price = Worksheets(Worksheet).Cells(Row, Column)
>
>Could I assign to Price (data type Currency?) CAD or USD numbers and then
>continue my calculation based on these currencies?
>
>Thank you for your help.


I'm not sure of your setup. But I think the only issue you would have is
keeping track of whether you are dealing with USD or CAD. And also you might
want to keep track of the conversion factor on certain dates.
--ron
 
Reply With Quote
 
 
 
Reply

Thread Tools
Rate This Thread
Rate This Thread:

Posting Rules
You may not post new threads
You may not post replies
You may not post attachments
You may not edit your posts

BB code is On
Smilies are On
[IMG] code is On
HTML code is Off
Trackbacks are On
Pingbacks are On
Refbacks are Off


Similar Threads
Thread Thread Starter Forum Replies Last Post
Worksheet not displaying "Sum" in lover right corner LMRS1 Microsoft Excel Misc 2 5th Dec 2009 09:38 PM
Converting this "French" currency format to "English"? StargateFanNotAtHome Microsoft Excel Discussion 5 29th Jul 2009 02:01 PM
Formating numbers &"Text" to appear as currency &"Text" in formula =?Utf-8?B?Um9iaW4gSy4=?= Microsoft Excel Misc 6 7th May 2007 02:03 PM
In Format>Cell>Numbers>currency>Symbol Please add "Rs. India" =?Utf-8?B?U3VyZW5kZXJhIE0gQmhhbm90?= Microsoft Excel Worksheet Functions 0 22nd Aug 2005 02:12 PM
Changing format of column from "general" to "currency" Old Car Microsoft Excel Misc 1 29th Apr 2005 09:49 AM


Features
 

Advertising
 

Newsgroups
 


All times are GMT +1. The time now is 02:21 AM.