VBA-построение цикла транспортной задачи

[Mile4kA]

Пожалуйста, помогите написать алгоритм построения цикла транспортной задачи, решенной методом потенциалов. Цикл начинает рисоваться от максимальной из оценок, далее проходит по бзисным числам ( строго под углом 90 градусов) и возвращается в ячейку с числом из которыйначался. Мне объясняли что это нужно делать следующим обазом: находим ячейку, из которой начинается цикл. проверяем в строке с этой ячейкой есть ли базисные числа, если есть-записываем их в массив, если нет проверяем аналогично столбец. далее в этом массиве для каждой записанной ячейки также проверяем наличие базисных в строках и столбцах. и так строим цикл. я суть поняла, а как это записать и реализовать-нет не знаю что и делать помогите поалуйста