I have over 1000 rows in which I have random numbers generated through
Rand() In the next column, I have If formula that tells me if the
random is equal or over .5. I have total at the column end which
calculates result.

I need to copy, paste as value, the result 1000 times in the third
column. I need a VBA code for it and will appreciate any help.
Thanks.


Instance Randum Over .5 Total
1 0.75531777 1 11
2 0.24115034 0 9
3 0.58654479 1 8
4 0.43096180 0 5
5 0.98913511 1 11
6 0.55350200 1 13
7 0.63553569 1 8
8 0.96183014 1 9
9 0.97235357 1 9
10 0.47758409 0 12
Total 12

range("c1:c100").value=range("c1:c1000").value

--
Don Guillett
SalesAid Software
(E-Mail Removed)
"Aqib Rizvi" <(E-Mail Removed)> wrote in message
news:(E-Mail Removed)...
>I have over 1000 rows in which I have random numbers generated through
> Rand() In the next column, I have If formula that tells me if the
> random is equal or over .5. I have total at the column end which
> calculates result.
>
> I need to copy, paste as value, the result 1000 times in the third
> column. I need a VBA code for it and will appreciate any help.
> Thanks.
>
>
> Instance Randum Over .5 Total
> 1 0.75531777 1 11
> 2 0.24115034 0 9
> 3 0.58654479 1 8
> 4 0.43096180 0 5
> 5 0.98913511 1 11
> 6 0.55350200 1 13
> 7 0.63553569 1 8
> 8 0.96183014 1 9
> 9 0.97235357 1 9
> 10 0.47758409 0 12
> Total 12
>