Метод наискорейшего спуска на VBA

[skid]

Может у кого-нибудь есть алгоритм поиска экстремума по двум координатам методом наискорейшего спуска, написанный на VBA.
Спасибо.