Cómo usar Excel para generar combinaciones de números aleatorios

Personalizar una función.

Función?abc()

¿Dim?i?As?Integer,?j?As?Integer,?A(1?To?6)?As?Integer

¿Para?i?=?1?A?6

¿Aleatorizar?'Cambiar la semilla que genera el número aleatorio

A(i)? ?Int(10?*?Rnd)

¿Para?j?=?1?A?i?1

Si?A(j)? Entonces

i?=?i?1

¿Salir?Para

¿Fin?Si

Siguiente?j

Siguiente?i

abc?=?A(1)?amp;?A(2)?amp;?A(3)?amp;?A(4)?amp;?A( 5)?&?A(6)

¿Fin?Función.