the first formula works like a charm...but i am not sure how to integrated the 2nd formula. all the inputs from the first formula are the same. in the below examples M72:N72 are sum and average of theoutputs from range E3:G3 x 60

Sheets("oversimulator").Select

Dim i As Long

For i = 0 To 60

Range("E3:G3").Offset(i, 0) = Range("E1:G1").Value

Range("E1:G1").Calculate

' battingsimulator

Dim ii As Long

For ii = 0 To 500

Range("S10:T10").Offset(i, 0) = Range("M72:N72").Value

Range("M72:N72").Calculate

Next i

'