Excel makro - iterace

Dobrý den, mám dotaz jestli by někdo nedokázal vytvořit toto makro nebo aspoň trochu poradit:
1. Porovnáváme hodnoty A a B

2. Toto srovnání ukazuje, jeden ze tří možných stavů:
Když A > B: musíme snížit A změnou k1 tak, že pokud k1>0 tak k2=k1(1-d), nebo pokud k1<0 tak k2=k1(1+d)
Když A < B: musíme zvýšit A, změnou k1 tak, že pokud k1>0 tak k2=k1(1+d), nebo pokud k1<0 tak k2=k1(1-d)
Když A = B zastavíme iteraci.

3. Vraťte se ke kroku 1. d je malé číslo.