Vba no hace sorteos repetidamente.
Crea un conjunto de datos para almacenar todos los números de tabla (puede ser discontinuo). Por ejemplo, hay 50 conjuntos de datos. Seleccione aleatoriamente un número entre 1 y 50 y busque el número de tabla correspondiente a este número en el conjunto de datos. Elimine este número de tabla del conjunto de datos y el conjunto de datos pasará a ser 49.
La próxima vez elegiré un número entre 1 y 49...