Всем привет!

Написал простенький скрипт, который ищет кратчайший путь от точки X до точки Y
Может кому-то будет интересно

Файл Excel во вложении
На выделенном диапазоне, в любом месте можем разместить точку X и точку Y. А так-же преграды, в виде точек "B" (цвет значения не имеет, ячейки потом закрасятся)
Так-же есть две кнопки
1) Find a patch - найти путь
2) Clear - очищает диапазон (кроме значений X, Y, B)

UPD: исправил одну ошибку и добавил кнопку "Step by step" - показывает поиск пути шаг за шагом для наглядной демонстрации (кроме финального построения пути)

Всем привет!

Я наконец-то доделал "морской бой" на VBA, через UserForm
И хочу поделиться с вами, своим творением
Реализовал не всё что хотел, на пример разные правила игры, но довел классическую версию до играбельного состояния

Делал примерно месяц, в обед и после работы
Критика приветствуется