Boucle emboitees sur vba

Bonjour tout le monde, je cherche a remplir deux colonnes sur excel a l'aide de 2 boucles For emboîtées. Voici le code que j'utilise:

For j = 1 To nombre
a = Cells(1 + j, 4).Value ' date de maturite
b = Cells(1 + j, 3).Value ' date de valorisation
x = Int((a - b) / 365) * Cells(1 + j, 16).Value
Y = j * x
Cells(19 + x, 16).Value = a


For i = 0 To x
 Cells(19 + j + Y - i, 15).Value = Application.WorksheetFunction.WorkDay(DateAdd("m", -Cells(1 + j, 18).Value, Cells(19 + Y + j - i, 16).Value), 0)

 Cells(19 + j + Y - i - 1, 16).Value = Application.WorksheetFunction.WorkDay(Cells(19 + Y + j - i, 15).Value, 0)

Cells(19 + j + Y - i, 21).Value = Cells(1 + j, 5)
Cells(19 + j + Y - i, 13).Value = Cells(1 + j, 20)
Cells(19 + j + Y - i, 22).Value = Cells(1 + j, 6)
Next i
Next j

quand je compile, j'obtient l'erreur" argument ou appel d'argument incorrect", et j'obtient cette erreur seulement quant j'ajoute le paramètre "Y".

Je vous remercie d'avance pour votre aide

EDIT: Ajout de la coloration syntaxique.