number to text but with only two decimal places

I have a spreadsheet where, in column D, is a listing of numbers. Some of the values are whole dollars, some are dollars and cents, and still others are dollars a fractional cents. Here is a simple listing of some of the numbers:

1306.7
150.1702
932.4683
1110.37
1212.7652

I would like to find a macro that will "clean up" my numbers by doing the following: 1) convert all numbers to dollars and cents with always only two decimals places 2) convert these numbers (currently in the general format) to text format instead.

Thank you very much (in advance) for your help,
Mike

Hi,

Probably not the most elegant, but,

Please Login or Register  to view this content.

Will perform the requested operations on the selected cells.

look at using the cast operators. For example, CINT will cast a value to an integer. Likewise you cant CSTR(value) to cast a value to a string. To get your format you can use

Please Login or Register  to view this content.

Sweep,

Thanks for the quick help! I am getting an error in the following line:

cl.Value = Round(cl.Value, 2)

The error I am getting is "Run-time error '13': type mismatch"

Can you help?

Thanks,
Mike

That error is generated if the value of the cell is not numerical.

Try this:

Please Login or Register  to view this content.

Dear Dave,

Thanks for your help. While I still received an error, even after I changed the attributes of the cells to number format, I decided to take your original posted answer and confined the process to just those cells that had a value.

Please Login or Register  to view this content.

It works very well. Thank you so much.

Mike

I would love to .. but no edit button appears in the original post. I thought I had already marked it SOLVED by using edit already. However, I am new to this process. Still learning.

Mike