Что мешает вам использовать встроенные функции генератора случайных чисел?
Из документов Excel:
Пример рандомизированного оператора: This
Пример использует оператор Randomize
инициализировать случайное число
генератор. Потому что числовой аргумент
был опущен, Randomize использует
возвращаемое значение из функции таймера
как новое начальное значение.
Dim MyValue
Randomize ' Initialize random-number generator. '
MyValue = Int((6 * Rnd) + 1) ' Generate random value between 1 and 6. '
Если вы не хотите / не можете использовать VBA, было бы неплохо разработать то, что вы хотели бы использовать.
EDIT:
Доступна также функция ячейки («RAND»), которая делает то же самое.