Próbuję napisać procedurę z wykorzystaniem pętli „Do Until”, ale coś mi nie wychodzi, dlatego proszę Was o pomoc.

W komórkach „B3”, „D5”, oraz  „G3” są pewne wartości liczbowe.

Komórka „B3” ma wartości z liczb całkowitych i ma wpływ na wartość komórki „D5”, czyli każda zmiana wartości komórki „B3” zmienia wartość komórki „D5”.

Moim celem jest, aby procedura pomniejszała wartość początkową komórki „B3” o liczbę 1

tak długo aż wartości komórek „D5” i „G3” będą równe.

W arkuszu są formuły, które pod wpływem zmiany wartości w komórce „B3” zmieniają wartości w innych komórkach. Zwykle ręcznie zmieniam wartość komórki „B3” tak długo, aż nie zrównają się wartości w komórkach „D5” i „G3”.

Przykładowo „G3” ma wartość 80 (zawsze l. całkowita) i pomniejszam ją tak długo, aż wartości komórek „D5” i „G3” będą równe.

 Najprościej będzie wyjaśnić czego oczekuję w jednym zdaniu

„Zmniejszaj wartość B3 co 1 krok o 1 tak długo, aż wartość w D5 będzie równa wartości G3 – to wszystko”

Pozostałe dane są nieważne. Wartość w D5 zależy od formuły, w której jednym z argumentów jest wartość w B3.

W załącznikach - stan przed i stan po.