Traducir el blog

Agenda Calendario Lunar 2025

🔝To translate this blog post to your language, select it in the top left Google box.


¡¡¡ Feliz y Próspero Año Nuevo 2025 !!!

Para comenzar este Año Nuevo lo mejor posible publico la Agenda Calendario Lunar actualizada para este nuevo año, que funciona únicamente con fórmulas, ¡sin macros VBA!

Se puede usar tanto en español como en inglés, y comenzar la semana en lunes o en domingo.

He intentado que se pueda abrir en cualquier versión de Excel, también en Excel para la Web y en las aplicaciones de Excel para Android y de Excel para Mac. ¡Ya me dirás si lo he conseguido!

De todos los calendarios que he hecho en Excel, éste es del que estoy más satisfecho para llevar al día mis asuntos. Espero que a ti te pase lo mismo que a mí.

AVISO: La única novedad de este año ha sido usar la celda B4 para que la semana comience en domingo o en lunes. Así puedo usar el rango de celdas B3:J3 para mostrar los datos de hoy en: la agenda, los aniversarios, los festivos o las tareas. También indico si no hay datos de hoy para el tipo de calendario elegido...

ATENCIÓN: El cambio del tipo de calendario se hace en la celda C3 de la hoja 'Agenda':

  • Mi agenda: Con todos los aniversarios, festivos y tareas.
  • Aniversarios: Con los aniversarios y las tareas.
  • Festivos: Con los festivos y las tareas.
  • Tareas: Solamente con las tareas de las 24 horas de los 365 días del año.

Sirva esta Agenda Calendario Lunar para felicitar el Año Nuevo a mis seguidores.


Descarga la Agenda Calendario Lunar

El archivo tiene todas las hojas protegidas con contraseña, para que los usuarios no destrocen las fórmulas.

Descarga desde uno de estos enlaces:

Esta plantilla no contiene macros, pues todos los cálculos se realizan ¡únicamente con fórmulas!

Si te interesa analizar las fórmulas, encontrarás la contraseña, para desproteger las hojas, en el primer artículo que publiqué sobre calendarios lunares:

ATENCIÓN: Se puede modificar este libro de Excel respetando esta licencia:

Creative Commons — Atribución-NoComercial-CompartirIgual-No portada — CC BY-NC-SA 4.0


Videotutorial de la Agenda Calendario Lunar

En este videotutorial explico como usar la Agenda Calendario Lunar:


Hojas de la Agenda Calendario Lunar

Esta agenda calendario lunar contiene las siguiente hojas:

  • Calendario: mensual y lunar, con hipervínculos a los eventos del año.
  • Agenda: con los próximos eventos: tareas, festivos y aniversarios.
  • Diario: con los eventos de las 24 horas de un día, y con hipervínculos.
  • Buscar: buscador de cualquier evento del año.
  • Festivos: lista editable de días festivos para cualquier año.
  • Aniversarios: lista editable de aniversarios para cualquier año.
  • Ayuda: enlaces a las páginas que me han servido de inspiración.
  • 2025: Planificador de eventos editables para 366 días x 24 horas.


Menú de la Agenda Calendario Lunar

Con los iconos del menú es más fácil cambiar de hoja, y saber qué hoja se ha seleccionado, pues cambia a rojo el color del icono.

Desde cualquier hoja se puede ir al evento del día de hoy, haciendo clic en el enlace con el hipervínculo.

Además he añadido la hora actual en todas las hojas de la agenda.


Tutoriales de la Agenda Calendario Lunar

En los siguientes artículos explico las principales características de la Agenda Calendario Lunar:


Cómo añadir años a la Agenda Calendario Lunar

En este vídeo explico cómo he actualizado la agenda, con un ejemplo de cómo convertirla en un calendario del año 2025, con lo que será fácil crear agendas de otros años.

¡Apunta en esta agenda tus propósitos para el Año Nuevo!

¡Y así nunca los olvidarás!

Jugando al Rabino en Excel - Parte 7

🔝To translate this blog post to your language, select it in the top left Google box.


Parte 7 de un juego del Rabino

Esta es la séptima parte de una serie de artículos con los que intento diseñar en Excel un juego de cartas con una variante especial del Rabino.

Al final de este artículo hay un enlace a todos mis juegos de cartas.

En esta Parte 7 explicaré:

♥️  Cómo combina las cartas el motor del juego.

♠️  Cómo jugar una partida completa.

♦️  Cómo decidir qué carta jugar.

♣️  Qué falta por hacer para finalizar el diseño del juego.

Los tres últimos temas están explicado en el vídeo que acompaña a este artículo.

Esta es la imagen del fin de partida jugada durante la grabación del vídeo de la Parte 7. El jugador Pedro Wave (el usuario de mi versión de Excel) ganó la partida, cerrándola con -10 puntos, pues tenía todas las cartas combinadas. Sus cartas son las de abajo, estando ordenadas de mayor a menor, para poder calcular los puntos de las cartas que pudieran no estar combinadas. En este caso hay 6 cartas del mismo palo, formando escalera descendente de diamantes ♦️, y otras 4 cartas del mismo palo en escalera de corazones ♥️.

Sigo mostrando las cartas de arriba, que son las del jugador contra el que juego, el Rabino en Excel. Lo hago a propósito para mostrar cómo funciona el nuevo motor del juego que he añadido en esta fase del desarrollo de la Parte 7.

Las cartas de arriba han finalizado el juego con los 3 puntos del 3 de picas ♠️. El resto de cartas están combinadas por lo que son de 0 puntos. Lo más curioso es que las cartas no están ordenadas formando combinaciones, aunque realmente están combinadas: 5 cartas formando escalera de tréboles ♣️ y 4 cartas formando escalera de picas ♠️, con el rabino como si fuera el 10 de picas. Luego explico por qué no están ordenadas...


Vídeo con la Parte 7 del juego

En este vídeo verás la partida completa, que he jugado como ejemplo de lo que se puede hacer hasta ahora en la Parte 7 de esta fase de desarrollo del juego. Prácticamente será como se podrá jugar cuando finalice este diseño, por lo que es conveniente aprender cómo jugar a esta variante del Rabino en Excel.

Cuando veas este vídeo, comprobarás que no soy un buen jugador del Rabino. Y también dudo que sea un buen programador de juegos, pero estoy seguro que todo se aprende practicando, lo que te animo a hacer en cualquier momento del juego incierto de esta vida finita.

A continuación explicaré lo que no he querido contar en este vídeo para no hacer espóiler.


Cómo combina las cartas el motor del juego

Esta variante del Rabino no la he diseñado en plan profesional sino en plan didáctico, por lo que me he tomado ciertas libertades.

La primera libertad, fundamental desde esta Parte 7 y en adelante, es que uso herramientas propias de Excel para crear el motor del juego, con el que conseguir combinar las cartas de arriba del usuario: Rabino en Excel.

Y como adelantaba en el vídeo: ¡No lo he hecho programando macros VBA!

Y entonces: ¿Cuál es el motor del juego? ¡¡¡ El complemento Solver de Excel !!!

Si aún no conoces el complemento Solver será mejor que antes leas esto:

Resumiendo, y haciendo espóiler, o sea destripando el motor del juego, he usado el complemento Solver para determinar el valor mínimo de la celda que contiene la fórmula con la suma de los puntos de un jugador, después de combinar las cartas, cambiando el valor de otras celdas.

La siguiente imagen es el resultado de aplicar el complemento Solver:


La hoja 'Motor' sirve de motor del juego, valga la redundancia, y contiene bastantes fórmulas complejas que no voy a explicar aquí. Si tienes interés, pregúntame...

En la columna D están las posiciones de las 11 posibles cartas de cada jugador, identificadas con números del 1 al 11.

En la columna E están las cartas según las posiciones determinadas con los valores de la columna D.

Las columnas F a O contienen fórmulas auxiliares con las que determinar las posibles combinaciones de las cartas de un jugador, tanto con escaleras como con cartas del mismo valor.

En la columna P se obtiene los puntos de las cartas que no se han podido combinar.

El total de la suma de puntos del jugador 2, o sea del Rabino en Excel, se obtiene en la celda P14, denominada miSolver, con la fórmula: =SUBTOTALES(9;misPuntosCartas2)

Siendo el rango de celdas misPuntosCartas2: =Motor!$P$3:$P$13

Solver cambia automáticamente los valores de un grupo de celdas, llamadas celdas de variables de decisión, que en este motor del juego están en el rango D3:D13 denominado: miNumCartas2

Solver intenta cumplir 4 restricciones de esas celdas:

  • miNumCartas2 = entero
  • miNumCartas2 <= 11
  • miNumCartas2 >= 1
  • miNumCartas2 = Todos diferentes

O sea, que esas celdas sean números enteros del 1 al 11 y diferentes entre sí, sin importar su orden.

En este pantallazo están los parámetros de Solver definidos para el motor de este juego.

Se establece como objetivo la celda denominada miSolver: =Motor!$P$14, para que la fórmula que contiene sea el valor mínimo óptimo.

Los valores del rango de celdas miNumCartas2 son el resultado obtenido por el complemento Solver, con las posiciones de las cartas combinadas según las reglas del juego.

Se ha elegido como método para encontrar una solución: Evolutionary, ya que el solucionador evolutivo prácticamente no hace suposiciones sobre las relaciones entre las variables de decisión y la función objetivo y las restricciones. Aunque puede ser que encuentre una "buena" solución, pero no necesariamente la solución óptima, lo que es suficientemente bueno para nuestro motor de juego, que realmente busca una buena combinación de las cartas, ya que no es un jugador profesional, de momento...

Si quieres saber más sobre los tres tipos de métodos del complemento Solver, abre este enlace en inglés:


Motor del juego compatible

Para que el motor del juego sea compatible con todas las versiones de Excel, desde Excel 2010 hasta Excel para Microsoft 365, he tenido que sudar un poco...

Pero todo se ha resuelto leyendo esta página en inglés:

Si escribes código convencional para ejecutar Solver solamente funcionará en tu computadora, y en cualquier computadora con las mismas versiones de Excel y Solver. ¿A que no queremos eso?

Para que Solver funcione en cualquier versión de Excel, no debe haber referencias a una versión concreta, lo que se consigue llamando al método: Application.Run

Este método permite ejecutar dinámicamente cualquier procedimiento de Solver, llamando al nombre del procedimiento entre comillas dobles, seguido de una lista separada por comas de los argumentos que se pasan al procedimiento, ordenados por posición.

El código está incluido en las macros y funciones del módulo: modMotor

  • ActivarSolver: Activa y configura el complemento Solver.
  • ConfigurarSolver: Configura el complemento Solver.
  • ResolverCartas: Resuelve las combinaciones de las cartas de un jugador con el complemento Solver.
  • CheckSolverIntl: Chequea si existe el complemento Solver en cualquier versión internacional de Excel.
  • IsInstalled: Test si está instalado Solver.
  • AddInInstall: Instala el complemento Solver.

He separado la activación del complemento Solver de la resolución del problema con Solver, con lo que solamente hay que llamarlo en dos ocasiones:

  • La macro IniciarRabino llama a ActivarSolver, con lo que queda activado y configurado el complemento Solver.
  • La macro CombinarCartas llama a ResolverCartas, con lo que ejecuta el complemento Solver, previamente configurado, cada vez que intenta encontrar las posibles combinaciones de las cartas del jugador Rabino en Excel.

Si no se alcanza una solución, en un tiempo prefijado por las opciones (SolverOptions) que veremos a continuación, aparece un mensaje de advertencia y el jugador presionará el botón Continuar o Detener, según le convenga:

NOTA: Cuando se configura Solver, se modifican sus opciones con esta llamada:

Application.Run "Solver.xlam!SolverOptions", 16, , 0.1, , , , , , 99, , , , , , , , , , , , 8

Lo que modifica, de momento y a falta de más pruebas, los siguientes valores en este juego:

  • MaxTime: La cantidad máxima de tiempo (en segundos) que Solver empleará para resolver el problema. El valor es un número entero positivo definido a 16 segundos.
  • Precision: Un número entre 0 (cero) y 1 que especifica la precisión con la que se deben cumplir las restricciones. El valor está definido a 0.1
  • IntTolerance: Un número decimal entre 0 (cero) y 100 que especifica la tolerancia porcentual de optimalidad de enteros. El valor está definido a 99.
  • MaxTimeNoImp: Cuando se utiliza el método de resolución evolutiva, la cantidad máxima de tiempo (en segundos) que Solver continuará resolviendo sin encontrar soluciones significativamente mejoradas para agregar a la población. El valor es un entero positivo definido a 8 segundos.

Los argumentos separados por comas y ocupan el lugar descrito en esta página en inglés:

En esta página hay más información del complemento Solver usado con VBA:


Qué falta por hacer

Para poder finalizar el diseño del juego aún falta bastante por hacer:

  1. Ocultar las cartas del jugador Rabino en Excel, que juega las cartas de arriba.
  2. Decidir automáticamente que ese jugador robe una carta de la pila de descartes o del mazo de cartas.
  3. Saber qué carta descartar automáticamente.
  4. Ordenar las cartas combinadas por el motor del juego para el jugador Rabino en Excel.
  5. Decidir cuándo puede y quiere acabar la partida cualquiera de los dos jugadores.
  6. Guardar estadísticas con los jugadores que van ganando las series de partidas.

Todo eso lo iremos viendo en las siguientes Partes de este curso sobre el diseño de un juego de cartas en Excel.


Descarga la Parte 7 de un Rabino en Excel

Descarga la Parte 7 de una variante del Rabino, compatible con las versiones de escritorio desde Excel 2010 hasta Excel para Microsoft 365.

Las macros del archivo descargado están bloqueadas por defecto. Para desbloquear las macros debes modificar las Propiedades del archivo siguiendo estas instrucciones:

Las macros de Internet están bloqueadas de forma predeterminada en Office - Deploy Office | Microsoft Learn

Abre el archivo y presiona el botón: Habilitar edición cuando aparezca el aviso de VISTA PROTEGIDA.

Presiona el botón: Habilitar contenido cuando aparezca la ADVERTENCIA DE SEGURIDAD Las macros se han deshabilitado o se deshabilitó parte del contenido activo.

Las macros VBA no están protegidas, por lo que puedes analizarlas. Las hojas están protegidas con una contraseña que es fácil conocer, pues está guardada en VBA escrita en la constante: sContra.

ATENCIÓN: Se puede modificar este libro de Excel respetando esta licencia:

Creative Commons — Atribución-NoComercial-CompartirIgual-No portada — CC BY-NC-SA 4.0


Más juegos de cartas en Excel

En este enlace encontrarás todos mis juegos de cartas programados en Excel:

Me ayudarás si me indicas las erratas que encuentres en este artículo, y si me comentas qué es lo que te gustaría ver en los próximos artículos.

Calculadora de Premios de la Lotería de Navidad

🔝Select the language of this blog post in the Google box at the top left.


Actualización 2024-12-22: Nueva calculadora Excel para bajarse la lista definitiva de premios de la Lotería Nacional de Navidad española del 22 de diciembre de 2024, y comprobar si nos tocaron los números que jugábamos.

Desde las 9:00 horas en España y una hora menos en las islas Canarias, hasta que acabe el sorteo puedes actualizar cada minuto o cada hora, según tu ansiedad por hacerte rico, los premios con el menú: Datos | Actualizar todo (Control + Alt + F5)

NOTA: Este artículo lo  publiqué por primera vez el 22 de diciembre de 2014 y cada año lo actualizo con el nuevo sorteo de Navidad. La próxima actualización será el próximo 22 de diciembre de 2025.


¿Y si nos ha tocado la lotería? ¡Cosa estadísticamente muy poco probable!

¿Y si nos toca pagar la lotería? ¡Cosa segura!


O acaso hay alguien tan boyante económicamente que pueda pagarla en metálico o en "negro".

Si lo normal es ¡tener que pedir un crédito! para poder comprar los décimos de la lotería...

Introduce los números que juegas en el rango de celdas B8:B27 y los importes que juegas en el rango C8:C27 y, cuando actualices, se calcularán automáticamente los premios que te han tocado.

ATENCIÓN: He ampliado a 20 los números a comprobar si están premiados.


Calculadora de visitas a este blog

Adelanto que a mí tampoco me ha tocado la lotería, pero voy camino de acabar el año con más de un millón doscientas quince mil visitas a este blog, gracias a los 482.227 lectores como tú, que se interesan por los artículos que voy escribiendo sobre Excel, siempre que puedo.


Mi lotería

No esperes que adivine los números premiados en la lotería, pues la lotería es un asunto cuyo resultado depende de la suerte o la casualidad.

Para comprobar los números de la Lotería de Navidad con Excel ¡como a mí me gusta! y ¡saber si aún debemos pagar 21 € por un café!, si nos pasa como al del anuncio de hace unos años, que no tenía ni metálico para comprarla, aquí va mi propuesta:

En lugar de bajar a la cafetería a que nos entreguen un sobre cerrado, que no sabemos que contiene y darnos una sorpresa, podemos bajarnos la Calculadora de Premios de la Lotería de Navidad en Excel (descárgala un poco más abajo).

Si alguno sigue sin querer bajar a la cafetería, que busque en Internet:

Lotería Nacional | Venta y resultados OFICIALES - Loterías y Apuestas del Estado (loteriasyapuestas.es)

A mí, como a la mayoría, me toca pagar todos los años la lotería a los afortunados a los que les ha tocado el Gordo de Navidad y a ¡Hacienda somos todos!

Si piensas que comprando lotería estás redistribuyendo la riqueza, ¡estás muy equivocado!

Lo que haces es redistribuir la pobreza, pues la mayoría de pobres pierde dinero comprando lotería, para que ganen los premios una minoría de nuevos ricos.


Descarga la Calculadora de Premios

Descarga el archivo desde cualquiera de estos enlaces:

Actualiza los premios con el menú: Datos | Actualizar todo (Control + Alt + F5)

Esta plantilla tiene la primera hoja protegida sin contraseña y no contiene macros, únicamente tiene una conexión a las tablas de la Lotería de Navidad española, y todo el cálculo se realiza ¡sólo con fórmulas y una tabla dinámica!


INSTRUCCIONES:

0)  Hacer clic en "Habilitar edición" en respuesta a: Este archivo procede de Internet y podría no ser seguro

1) Hacer clic en "Habilitar contenido" en respuesta a la Advertencia de seguridad: Se han deshabilitado las conexiones de datos externos

2) Actualizar la tabla de la hoja 'Alambres' con el menú: Datos | Actualizar todo (Control + Alt + F5)

3) Actualizar la tabla dinámica de la hoja 'Números' con el menú: Datos | Actualizar (Alt + F5)


Videotutorial de la Calculadora de Premios


Problemas con la descarga de la lista oficial

Con este aporte se pueden descargar los números de la página oficial, pues desde el archivo pdf, que publica Loterías y Apuestas del Estado, no se permite la copia de los números premiados.

La descarga del archivo pdf se hace desde este enlace:

LISTAOFICIAL.A2024.S102.pdf (loteriasyapuestas.es)

La imagen con los Permisos del archivo muestra las opciones de seguridad del archivo pdf, descargado con la lista completa de los números de la lotería, comprobando que no se permite nada excepto Imprimir (en "Alta resolución"). No se permite la copia de contenido y ni siquiera está activada la accesibilidad al contenido, por lo que no ayuda a obtener la lista de números premiados en Excel.


Cómo funciona la Calculadora de Premios

Con mi plantilla se establece una conexión a la web de Loterías y Apuestas del Estado:

Tablas y Alambres - Loterías y Apuestas del Estado (loteriasyapuestas.es)

En esta imagen animada muestro las propiedades de: Conexión Lotería

En la consulta web es importante hacer clic en cada uno de los 10 alambres de la Tabla 1, para que queden marcados todos los alambres. Las 9 tablas restantes se importan automáticamente.

Y se consigue un listado de hasta 20 números premiados en cada uno de los 10 alambres de cada una de las 10 tablas de extracciones, generando automáticamente y pudiendo consultar todos los números premiados el 22 de diciembre. Los reintegros de la última cifra del premio "GORDO" se calculan con una fórmula adicional.

TRUCO: Para poder marcar cada uno de los alambres, previamente se debe acceder a: Opciones de consulta web

Y marcar:

Deshabilitar redireccionamiento de consultas web

Por supuesto que mi plantilla no contiene ninguno de los números de la lotería pues, si así fuera, tendría que pagar al Estado "royalties" (en la lengua española serían regalías) y cada cual es libre de conectar y descargar los números premiados.

¡Buena suerte a todos!

¡Incluso a los que no juegan a sorteos al azar!

Jugando al Rabino en Excel - Parte 6

🔝To translate this blog post to your language, select it in the top left Google box.


Parte 6 de un juego del Rabino

Esta es la sexta parte de una serie de artículos con los que intento diseñar en Excel un juego de cartas con una variante especial del Rabino.

Al final de este artículo hay un enlace a todos mis juegos de cartas.

En esta Parte 6 explicaré:

♥️  Cómo jugar con dos jugadores.

♠️  Cómo combinar al menos tres cartas.

♦️  Cómo contar las cartas de cada jugador.

♣️  Cómo guardar una partida del Rabino.

En esta imagen le toca jugar al jugador con las cartas la fila de abajo, que tiene todas las cartas casadas excepto el tres de tréboles 3♣️ por lo que, según una de las reglas de esta variante del juego del Rabino, podría cerrar con una única carta que valga hasta 3 puntos. El jugador con las cartas de la fila de arriba también tiene una sola carta sin combinar, el dos de diamantes 2♦️, por lo que anotará 2 puntos en esta partida.

Las cartas de los dos jugadores siguen estando de cara a la vista en esta Parte 6 del desarrollo, lo que he hecho a propósito para familiarizar al jugador con los movimientos posibles en esta variante del Rabino. En la siguiente entrega estarán ocultas las cartas de la fila de arriba, que son las del jugador denominado: "Rabino en Excel", que es el otro jugador contra el que hemos de jugar los usuarios de Excel, en mi caso: "Pedro Wave".


Vídeo con la Parte 6 del juego

En este vídeo explico el estado del arte de este desarrollo: cómo jugar a esta variante del Rabino; cómo combinar al menos 3 cartas; cómo contar el valor de las cartas; como acabar una partida.


Cómo jugar con dos jugadores

Esta variante del Rabino no la he diseñado en plan profesional sino en plan didáctico.

Una de sus principales limitaciones es que solo hay dos jugadores:

  • El Usuario de Excel: Es un jugador naturalmente humano, y moverá las cartas de la fila de abajo según su propia voluntad. Su nombre es el del usuario de Excel, en mi caso me llamo: Pedro Wave.
  • El Rabino en Excel: Es un jugador artificialmente Excelente, que moverá las cartas de la fila de arriba automáticamente según un algoritmo que aún no he creado. ¿Me ayudas a programarlo?

De momento, en esta Parte 6 el Usuario de Excel también tiene que jugar con las cartas del jugador Rabino en Excel, por lo que las cartas de los dos jugadores están a la vista.

Para saber qué jugador tiene el turno del juego, su nombre está en amarillo. Si no le toca el turno su nombre está en blanco.

El jugador con el turno debe robar la carta de arriba del mazo de cartas oculto o la carta de arriba de la pila de descartes que está a la vista. Si tiene 11 cartas en la mano, es obligatorio descartar una echándola a la pila de descartes. La carta descartada será la que se piense que es más difícil de combinar con el resto de las cartas. Una vez descartada una carta es el turno del otro jugador que repetirá el proceso.


Cómo combinar al menos tres cartas

La baraja del Rabino está formada por 4 palos: corazones ♥️, picas ♠️, diamantes♦️ y tréboles ♣️.

Cada palo está formado por 13 cartas distintas, por lo que hay un total de 52 cartas para los 4 palos de la baraja.

El rabino (#) no tienen palo asociado y, si no consigue combinar con otras cartas, suma 20 puntos.

El total de cartas de esta variante del Rabino es de 52 cartas + 4 rabinos = 56 cartas en total.

El orden de las cartas, con valor de mayor a menor, es el siguiente: rey (K), caballo (Q), sota (J), diez (10), nueve (9), ocho (8), siete (7), seis (6), cinco (5), cuatro (4), tres (3), dos (2) y uno (1) o as (A).


Reglas para combinar las cartas de cada jugador:

1) Intenta formar series de al menos 3 cartas iguales, o sea, con el mismo valor.

2) Intenta formar escaleras de al menos 3 cartas del mismo palo y con valores de mayor a menor.

3) Además el as (A) puede formar escalera con el rey (K) y el caballo (Q).

4) Los rabinos sirven como comodín para sustituir cualquier carta, de cualquier palo y cualquier valor.

En la imagen de arriba a la derecha hay 3 ases (A) combinados. En la imagen de abajo a la derecha hay un as (A), un rey (K) y un rabino (#) combinados. 

Algoritmo combinatorio:

En la hoja 'Motor' están las fórmulas para comprobar las posibles combinaciones de cartas de cada jugador. Aún está en fase de depuración y pruebas, por lo que si encuentras errores, me ayudará si me los comunicas en un comentario.

ATENCIÓN: Para mi algoritmo no es lo mismo poner un rabino detrás de una combinación como la escalera del 10, 9, 8 y 7 de tréboles, con lo que el rabino continua esa escalera. Lo mejor es separar el rabino de la combinación anterior, con lo que se genera una nueva escalera con el 2 y el as (A) de corazones. En la captura de arriba el 2 y el as (A) suman 3 puntos, pues estas dos cartas no combinan con el rabino. En la captura de abajo hay 3 combinaciones distintas y las 10 cartas suman 0 puntos, por lo que se puede ganar la partida.

Es importante decidir dónde se colocan las cartas para formar combinaciones en mi variante ¡no profesional! del Rabino.


Cómo contar las cartas de cada jugador

Debajo de las cartas de arriba, y encima de las cartas de abajo, he añadido los puntos de las cartas sin combinar de cada jugador, para que sea fácil saber si una carta está combinada con otras según las reglas del juego.

Las cartas sin combinar valen los siguientes puntos, entre paréntesis: rabino (20), rey (10), caballo (10), sota (10), diez (10), nueve (9), ocho (8), siete (7), seis (6), cinco (5), cuatro (4), tres (3), dos (2), as (1).


Reglas para que, antes de robar, un jugador gane la partida de esta variante del Rabino:

1) Si consigue que sus 10 cartas estén combinadas, cerrará la partida con -10 puntos.

2) Si consigue que 9 cartas estén combinadas, y solamente haya una carta sin combinar, siendo un as (1) o un dos (2) o un tres (3), cerrará la partida con 1, 2 o 3 puntos, respectivamente.

3) Si consigue que sus 10 cartas sean del mismo palo, aunque no estén combinadas entre sí, conseguirá cerrar la partida con esta jugada, denominada: Color, y se anotará -20 puntos.

4) Si consigue que sus 10 cartas sean del mismo palo y forman una escalera completa, conseguirá ganar la secuencia de partidas con esta jugada, denominada: Escalera Real. Es la jugada más brillante de esta variante del Rabino. En la imagen las cartas de la fila de arriba son todas de diamantes, pues los rabinos son del palo que se quiera, y forman una escalera, siendo la carta de la izquierda un rabino que equivale en esta posición a un as (A) de diamantes, el segundo rabino equivale al 8 de diamantes y el tercer rabino equivale al 5 de diamantes, por lo que forman una Escalera Real: A, K, Q, J, 10, 9, 8, 7, 6 y 5. A las cartas de la fila de abajo les falta el 4 de corazones para formar una Escalera Real.

5) El jugador que no ha conseguido cerrar sumará el valor de las cartas que no ha conseguido combinar. Cada rey (K), caballo (Q) o sota (J) suman 10 puntos. Un rabino sin combinar suma 20 puntos.

6) Si un jugador suma más de 100 puntos pierde la secuencia de partidas

7) El jugador que ha ganado la última partida comienza una nueva partida.

Estas últimas reglas serán implementadas en próximas entregas...

En esta imagen le toca jugar al jugador Rabino en Excel, que tiene las cartas de arriba. Si no roba la carta oculta del mazo, o la carta de arriba de la pila de descartes, puede cerrar ganando la partida, pues 9 de sus cartas están combinadas y solamente ha dejado de combinar el as de rombos, con lo que cierra y suma un punto en esta partida.

El jugador Pedro Wave, que tiene las cartas de abajo, ha perdido y suma los 18 puntos de las cartas sin combinar.


Cómo detectar las combinaciones y calcular lo puntos

El cálculo de las combinaciones conseguidas y de los puntos de las cartas sin combinar se hace en la hoja 'Motor'. Ver imagen de la derecha.

En la columna D están las cartas de cada jugador.

En la columna E el valor nominal de cada una de las cartas.

En la columna F está el palo de cada carta, excepto para los rabinos en los que no cuenta el palo.

En cada una de las columnas G a J se obtienen las cartas con el mismo palo: corazones ♥️, picas ♠️, diamantes♦️ y tréboles ♣️, respectivamente. Además se detectan las posibles escaleras de mayor a menor valor, pudiendo formar escalera con un as (A) un rey (K) y un caballo (Q). El valor de los rabinos es uno menos que la carta de encima o uno más que la carta de abajo. El rabino vale 1, como un as (A), si la carta de abajo es un rey (K).

En la columna K se obtienen los valores de las cartas, siendo el valor de los rabinos igual al de la carta de encima.

En la columna L se calculan las combinaciones de escaleras, según las columnas G a J.

En la columna M se calculan las combinaciones de cartas con el mismo valor, según la columna K. 

En la columna N se averigua qué combinación es válida dependiendo de las combinaciones de las columnas L y M.

En la columna O se calculan los puntos de las cartas que no se han podido combinar, valiendo 10 puntos los reyes (K), los caballos (Q) y las sotas (J). Se suman 20 puntos si no se ha combinado algún rabino.

Las fórmulas de las columnas mencionadas están en fase de depuración y pruebas, por lo que no son definitivas... Eso sí, en Archivo > Opciones de Excel > Fórmulas > Opciones de cálculo, está marcado el Cálculo iterativo con Iteraciones máximas y Cambio máximo puestos a 1.


Cómo guardar una partida del Rabino

En la columna B de la hoja 'Motor' he guardado algunas variables necesarias para poder guardar una partida en cualquier momento y poder continuarla la próxima vez que se abra el archivo Excel, que puedes descargar a continuación.


Descarga la Parte 6 de un Rabino en Excel

Descarga la Parte 6 de una variante del Rabino, compatible con las versiones de escritorio desde Excel 2010 hasta Excel para Microsoft 365.

Las macros del archivo descargado están bloqueadas por defecto. Para desbloquear las macros debes modificar las Propiedades del archivo siguiendo estas instrucciones:

Las macros de Internet están bloqueadas de forma predeterminada en Office - Deploy Office | Microsoft Learn

Abre el archivo y presiona el botón: Habilitar edición cuando aparezca el aviso de VISTA PROTEGIDA.

Presiona el botón: Habilitar contenido cuando aparezca la ADVERTENCIA DE SEGURIDAD Las macros se han deshabilitado o se deshabilitó parte del contenido activo.

Las macros VBA no están protegidas, por lo que puedes analizarlas. Las hojas están protegidas con una contraseña que es fácil conocer, pues está guardada en VBA escrita en la constante: sContra.

ATENCIÓN: Se puede modificar este libro de Excel respetando esta licencia:

Creative Commons — Atribución-NoComercial-CompartirIgual-No portada — CC BY-NC-SA 4.0


Más juegos de cartas en Excel

En este enlace encontrarás todos mis juegos de cartas programados en Excel:

Me ayudarás si me indicas las erratas que encuentres en este artículo, y si me comentas qué es lo que te gustaría ver en los próximos artículos.

Mi lista de blogs