Change range of cells within VBA macro and copy and paste to fixed cell range

I have to following code:

For i = 40 To 41
value = i

    'Range("C41:F41").Select  ------------------------------> Basically want to change this range every time in the loop from C41:F41 to C42:F42, C43:F43 uptil C57:F57.
    Range(Cells(3, i), Cells(6, i)).Select ---------------------> Used this to do it but the paste rows C26:F26 show up as empty cells
    Selection.Copy
    Range("C26:F26").Select
    ActiveSheet.Paste

    Next i
    
End Sub

How can I accomplish this?