Вы можете выполнить перемешивание Фишера-Йейтса в VB для приложений (VBA), например, используя реализацию алгоритма, показанную здесь .
Обязательно используйте хороший генератор случайных чисел, криптографически безопасный, если это необходимо. Randomize
посеян только по системному времени, поэтому я бы не стал проводить с ним лотерею.