Aide algorithme

Bonjour. Auriez-vous une idée pour résoudre ce problème via VBA :

Soit la fonction f(x) = -1 / (1+x)

Il faut faire l'image de chaque image, et ce 2014 fois, en commençant par l'image de 4.

f(4) = -0.2

f(-0.2) = -1.25

f(-1.25) = 4

f(4) = -0.2

2014 fois d'affilé

Il faut donc trouver le résultat au bout de 2014 images. Le résultat est bien sûr f(4) = -0.2. Mais comment le démontrer en VBA ?

Merci du temps que vous me consacrez.

Bonjour,

Avec la macro suivante, tu inscriras les 2014 valeurs dans la colonne A

Sub Test()
Dim a As Double
Dim i As Integer
    a = 4
    i = 1
   Do Until i > 2014
        Range("A" & i) = a
        a = -1 / (1 + a)
        i = i + 1
    Loop
End Sub

A+

Merci , cela me convient assez bien !

J'ai rajouter rapidement quelques petites "fonctionnalités"