Macro to record sample results (with example sheet)

[Jeremy35]

I would like to have a macro that allows me to cycle a control group through 20 random samples while recording the resulting total for each sample in a separate record list. I have tried using the macro recorder provided in Excel, but have not been able to accomplish this.

Attached is an example sheet.

The step by step of the desired macro would be this:

1. Re-Calculate sheet
2. Record the total in the blue cell in the green cell adjacent to "Sample 1".
3. Re-Calculate sheet
4. Record the new total in the blue cell in the green cell adjacent to "Sample 2".
5. Re-Calculate sheet
6. Record the new total in the blue cell in the green cell adjacent to "Sample 3".
.... all the way through sample 20 and then stop.

Any help would be greatly appreciated!

[Bernie Deitrick]

With the first sheet active, run this macro:

Sub Get20RandomNumberSums()
    Dim i As Integer
    
    For i = 1 To 20
        Application.CalculateFull
        Cells(i + 2, "G").Value = Range("C14").Value
    Next i
End Sub

[Jeremy35]

Thank you Bernie! Worked perfectly.