Excel - Barajar cartas.

Hola,

Tengo una hoja excel con 52 filas en la columna A, cada fila es el nombre de una baraja de naipes/cartas, tal que asi:

COLUMNA A:
Fila 1: AS DE PICAS
Fila 2: NUEVE DE DIAMANTES
[...]
Fila 52: AS DE TREBOL

Necesito una macro que me mezcle, o sea, que baraje, esas 52 filas aleatoriamente sin repeticion cada vez que pulse un boton. ¿Es muy complicado? A ver si alguien me puede ayudar, no se muy bien como hacerlo, soy bastante novata.

Besos,
Sonia.

Hola Sonia, lo que quieres puedes hacerlo aun sin macro, un ejemplo es el siguiente:

Supongamos que entre E1:E52 tienes los números de 1 a 52 y frente a ellos tienes los nombres de cada una de las cartas de la baraja como dices en cualquier orden por ejemplo:

Fila 1: AS DE PICAS
Fila 2: NUEVE DE DIAMANTES
[...]
Fila 52: AS DE TREBOL

Luego colocas entre desde las celdas B1 hasta B52 =ALEATORIO() generando 52 alearorios.

Ahora entre A1 y B52 colocas:

=BUSCARV(JERARQUIA(B1;$B$1:$B$52;1);$E$1:$F$52;2;0)
=BUSCARV(JERARQUIA(B2;$B$1:$B$52;1);$E$1:$F$52;2;0)
[...]
=BUSCARV(JERARQUIA(B52;$B$1:$B$52;1);$E$1:$F$52;2;0)

y con esto cada que edites alguna celda y des INTRO tendras una nueva mezcla.

Te envío el archivo por correo.

Cordial saludo

Sonia he intentado enviarte el archivo a tu cuenta [email protected] pero parece que no es así, si necesitas el archivo me escribes y te lo envío, como puedes ver mi cuenta es [email protected]

Salu2

Ahora lo puedes tomar aqui

http://rapidshare.com/files/127504470/Barajar_cartas.xls.html

Te coloque ahi el archivo y la macro que tiene únicamente es para notener que estar dando por ejemplo F2 y enter para cambiar los aleatorios.

Le coloqué además un formato condicional en A1:A52 para descubrir duplicados dentro de las cartas barajadas, para asegurarnos que no se repiten

Cordial saludo desde Pereira Colombia

Hola Luis,

Esta bien tu hoja, era exactamente lo que buscaba, muchisimas gracias.

Besos,
Sonia.

Ok con mucho gusto haberte ayudado.

Salu2 desde Pereira Colombia