Variable ne change pas de valeur dans une boucle for

Bonjour,

j'ai eu une problème dans mon code vba qui me permet de prendre chaque fois une cellule de fichier excel et l'utilise pour afficher une autre valeur cependant il affiche le même résultat:


voici mon code en résumé:

Dim input_count As Integer, d As Integer, ii As Integer
Dim output_count As Integer
Dim y As Single
input_count = Application.WorksheetFunction.CountA(Feuil1.Range("$V:$V"))
output_count = Application.WorksheetFunction.CountA(Feuil1.Range("$W:$W"))
ReDim xin(input_count) As Double
ReDim yin(input_count) As Double
Dim x As Single
d = Application.WorksheetFunction.CountA(Range("Y:Y"))
For ii = 6 To d
x = Cells(ii, 24).Value 'on prend l'input x ceci

blablabllllaa

Cells(ii, 26).Value = y
Next ii
end sub

merci pour votre aide!!!