Excel-VBA Сумма строки именованного диапазона

У меня следующий код

 For i = 1 To DepRng.Rows.Count
    For j = 1 To DepRng.Columns.Count
         DepRng.Cells(i, j) = Application.Sum(KidsRng.Row(i)) //Does not work
    Next j
 Next i

Хотя я знаю, что это неверно, Я понятия не имею, как заставить его хранить в DepRng.Cells (i, j) общую сумму всего KidsRng.Row [i] Любая помощь?