Format columns to two decimal places

Hi...I have some code which splits data on one worksheet and copies to another worksheet. On this worksheet I have two columns which are amounts (coulmns I and J) and I would like these columns to be set to two decimal places.
I don't want to have to manually format the columns. Is there a code available for this please? Thanks

Hi,

How about

Please Login or Register  to view this content.

Hi Sweep...yes I had tried that but for some reason the amounts are still at 11 decimal places though on screen they appear at 2 decimal places.
The first worksheet where all the data is entered the amount columns are set to two decimal places which is fine. On this worksheet a calculation is carried out to multiply the amounts with a formula and come up with the result and it is this new amount that is copied to another sheet. So I'm not sure if it becuase of the calculation that the amounts are not to two decimal places.
Any ideas how to correct this?
I am attaching extract of worksheet

So there are two options:

1) Bound the calculation that generates the 11 decimal places inside a ROUND function, ie

=ROUND(your_calculation,2)

2) Round the values using VBA, for example, in your posted sheet

Please Login or Register  to view this content.