I'm trying to have a for loop that takes my weeks and then another for loop that looks at my product to calculate the sales for this year, last year and then the difference. I am getting 0's for all of the weeks except for the current week, any idea what is wrong with my code? Thanks

```vba
Sub Weekly_Recap()
Dim h, d As Worksheet
Dim myarray(), answers() As Variant
'Dim week, datarange As Range
Dim D1, i As Long

Set h = Worksheets("Helper")
Set d = Worksheets("Data")

myarray = d.Range("P2:P51")

D1 = UBound(myarray, 1)

ReDim answers(1 To D1, 1 To 3)

For i = 1 To D1

    If myarray(i, 1) <= h.Range("A1") Then

    For j = 1 To 17

        answers(i, 1) = Application.WorksheetFunction.SumIfs(d.Range("G:G"), d.Range("B:B"), myarray(i, 1), d.Range("F:F"), h.Cells(j, 4))
        answers(i, 2) = Application.WorksheetFunction.SumIfs(d.Range("H:H"), d.Range("B:B"), myarray(i, 1), d.Range("F:F"), h.Cells(j, 4))
        answers(i, 3) = (answers(i, 1) - answers(1, 2)) / answers(i, 2)

            If h.Cells(j, 4) = "FLAVORED/FUNCTIONAL WATER" Then

                h.Range(h.Range("F2"), h.Range("F2").Offset(D1, 2)).Value = answers
                ElseIf h.Cells(j, 4) = "SALTY BAGGED/CANISTER SNACKS" Then

                h.Range(h.Range("K2"), h.Range("K2").Offset(D1, 2)).Value = answers
            End If
        Next j
    End If

Next i

End Sub

```