Hello all,

I need to calculate the averages of a varying number of columns.
So far, I have this code that works to create the headers of the columns that will store the results :

For i = 3 To Worksheets("Data 1 sec").Cells(1, Columns.Count).End(xlToLeft).Column - 1
        Cells(2, i + 10).Value = Mid(Worksheets("Data 1 sec").Cells(1, i), 7)
        average code here
Next
The code calculating the average needs to work with rows 2 to 1500, for each i column.
I just can't figure this one out, even though I did find some stuff with my friend Google, but either it doesn't fit my needs or I don't understand the solutions.

Anyone can help me here ?

Thanks.