«У нас всё записано, просто в Экселе» — эту фразу я слышу от владельцев сервисных компаний чаще любой другой. Звучит она обычно спокойно, иногда даже с гордостью: порядок есть, деньги на дорогие программы не потрачены. МоторДом, сеть автосервисов с четырьмя точками по Москве, повторяла её ровно до того дня, пока не потеряла контракт, который два года кормил компанию больше, чем все остальные клиенты вместе взятые. МоторДом начинался как одна мастерская у МКАД. Клиенты — частники, машины по одной, ремонт по записи...

Я наткнулся в сети на такой скриншот и подумал, а почему бы не найти такое решение. Ниже инструкция, макрос и результат. Результат: Код макроса ниже. Option Explicit ' ========================================================== ' Генератор судоку для Excel ' Поле выводится на активный лист в диапазон A1:I9 ' ========================================================== Sub GenerateSudoku() Dim ws As Worksheet Dim ans As Variant Dim clues As Long Dim mb As VbMsgBoxResult Dim board(1 To 9, 1 To 9) As Long...