For loop not being launched

Hello!

The for loop within this do loop is being skipped and therefore I get "divide by 0" error. Why isn't the for loop launched and how can I fix it? msgbox never appears.

    x = 1
    Do
    addi = 0
    addiTotal = 0
       For y = 1 To y = 5
            MsgBox "X: " & x & " Y: " & y
            If jumps(x + y).Value > 0 Then
                addi = addi + jumps(x + y)
                addiTotal = addiTotal + 1
            End If
        Next y       
        jumps(x) = (jumps(x) + addi) / addiTotal
        x = x + 5
    Loop Until x >= lopdiff

Thank you!