Нахождение критического пути табличным методом

Для этого предусмотрен алгоритм поиска повторяющихся значений в критическом пути.'Построение критического пути.For i = 2 To n.Если повторения обнаружены, то программа строит критический путь в обратном порядке.Критический путь: 1-5-6-10.'Выявление критических этапов.Sheets (Rez) .Cells (scount + 2, 1) .Value = Критический путь:.If Not ActiveSheet.Cells (i, j) .Value = Then.For i = 2 To scount.MsgBox Точный перевод невозможен. Попробуйте другой вариант, vbCritical + vbOKOnly, Ошибка ввода.