Vba beginner question

[lynxmo]

To dear all. In my vba task, I meet one question like the following. Hope someone can do me a favor.

Random uniform 1 2 3 4 5 6 7 8 9 10 11 12 <colgroup><col></colgroup><tbody> </tbody>	0,964274899 0,038850448 0,266376936 0,740520709 0,963839292 0,256455657 0,087700616 0,392575932 0,459835397 0,824301717 0,953287091 0,392802765 <colgroup><col></colgroup><tbody> </tbody> Rand()
Normal number	0,340821459

<tbody>
</tbody>

And then in the vba part
That is the macro will sum 12 uniform random numbers and then will substract 6 to the sum and return the result which is a normal random number.
The result should be in the following table.

B	C
Normal numbers 1 2 3 4 5 6 7 8 9 10 <colgroup><col></colgroup><tbody> </tbody>

<tbody>
</tbody>

 

[oldbrewer]

are you doing this many times and producing a histogram

generate 12 numbers add them subtract 6 is easy to understand and will give numbers clustered around zero

your second part - what are the numbers 1 to 10 ?

 

[lynxmo]

are you doing this many times and producing a histogram

generate 12 numbers add them subtract 6 is easy to understand and will give numbers clustered around zero

your second part - what are the numbers 1 to 10 ?

I will send the picture. it will be clear.

 

[oldbrewer]

you just put =rand() in 12 cells, total them, subtract 6 from the total....

 

[lynxmo]

you just put =rand() in 12 cells, total them, subtract 6 from the total....

It's just for the question 1. And the question 3 should be in the VBA...
I Know the excel formula，But I need the marco function.
Thanks anyway

 

[oldbrewer]

for j=1 to 12
sum=sum+rnd
next j
mynumber=sum-6
cells(1,1)=mynumber
end sub

make sure you understand this rather than just copy it or you will not really learn excel....and there are more modern vba commands - what have you been taught ? eg the "with" command.........

 

[lynxmo]

for j=1 to 12
sum=sum+rnd
next j
mynumber=sum-6
cells(1,1)=mynumber
end sub

make sure you understand this rather than just copy it or you will not really learn excel....and there are more modern vba commands - what have you been taught ? eg the "with" command.........

Thanks so much.
Because at first I use the sub normalnumber() as the follow:
[FONT=&quot]range("C30:C39")=WorksheetFunction.Sum(Range("C5:C16"))-6

Thanks

[/FONT]