🔝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.
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:
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!
♣️ 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:
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:
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:
Las macros del archivo descargado están bloqueadas por defecto. Para
desbloquear las macros debes modificar las Propiedades del archivo
siguiendo estas instrucciones:
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:
🔝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:
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!
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:
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:
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.
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:
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:
♥️ Cómo cambiar el modo de juego:
Modo lento 🐢, arrastrando y soltando las cartas. Modo rápido 🐇, haciendo
clic en una carta.
♠️ Cómo combinar las cartas de cada jugador.
♦️ Cómo robar una carta del mazo o
de la pila de descartes.
♣️ Cómo echar una carta a la pila de descartes.
En esta imagen animada se ha elegido el modo rápido, representado por una
liebre 🐇, por lo que sólo hace falta hacer clic sobre una carta para
cambiarla de posición.
Comienza la animación sin ninguna carta en la tercera posición de las cartas
del jugador de la fila superior.
Al hacer clic en el mazo, con las cartas ocultas boca abajo, se roba el rey
de diamantes que ocupa la tercera posición de las cartas del jugador de la
fila superior.
Al hacer clic en la cuarta carta, el jugador de la fila superior descarta el
siete de picas, que va a parar a la pila de descartes.
Los dos jugadores tiene normalmente 10 cartas. Un jugador tendrá 11 cartas
si roba una carta del mazo o de la pila de descartes. La siguiente jugada
será descartar una de sus cartas, echándola a la pila de descartes, con lo
que vuelve a tener 10 cartas.
En esta fase de desarrollo del juego se muestran todas las cartas hacia
arriba, lo que será diferente en las entregas de las próximas partes de este
Rabino. De momento, pienso que es más didáctico ver las cartas de los dos
jugadores que mostrar únicamente las cartas del jugador humano...
En la Parte 5 aún no pueden repartir las cartas los dos jugadores, solamente
el jugador humano que tiene las cartas colocadas en la fila de abajo.
Vídeo con la Parte 5 del juego
En este vídeo explico cómo cambiar el modo de juego, lento o rápido, cómo
combinar las cartas de cada jugador, cómo echar cartas en la pila de
descartes y cómo robar cartas del mazo o de la pila de descartes.
Cómo cambiar el modo de juego
He programado dos modos de juego:
Modo lento (modo tortuga🐢): Las cartas se arrastran de su posición
inicial y se sueltan a su posición final. Es la forma más realista de
mover las cartas en el tapete.
Modo rápido (modo liebre 🐇): Haciendo clic sobre una carta, que
cambia automáticamente a su posición final, dependiendo del estado del
juego.
Para seleccionar uno de los dos modos del juego, hay que hacer clic en la
tortuga o en la liebre, con lo que cambia el modo del juego con la macro
CambiarModo.
La ventaja del modo lento es que es más realista, ya que los jugadores
mueven las cartas manualmente desde una posición a otra, con un bucle en la
función
ArrastrarCartas, que detecta la posición final con la función
FinPosCarta.
Para ello he ajustado los márgenes en los que se puede soltar una carta,
después de arrastrarla a su posición final, lo que se comprueba con la
función SoltarCartas.
Si el jugador se equivoca, y no coloca la carta en la posición final
correcta, la carta vuelve a su posición inicial.
Cómo combinar las cartas de cada jugador
En esta Parte 5 del desarrollo del juego del rabino, se pueden combinar
cartas de cualquiera de los dos jugadores, lo que hace la
macro CombinarCartas.
Si se hace clic en la carta de un jugador, se comprueba si ese jugador tiene
10 cartas, en cuyo caso:
En modo rápido: Se cambia la carta a la posición vacía de las 11 cartas
posibles de ese jugador.
En modo lento: Si se arrastra y se suelta la carta cerca de la posición
vacía, cambia la carta a esa posición. En caso contrario, devuelve la
carta a la posición inicial.
Con lo que se van combinando manualmente las cartas de cada jugador, para
conseguir combinar al menos 3 cartas con el mismo índice o con escalera del
mismo palo.
En esta fase del desarrollo la combinación se puede hacer en cualquier
momento con cualquiera de los dos jugadores, excepto si el otro jugador ha
robado una carta y tiene 11 cartas en la fila superior, en cuyo caso es
obligado a descartar una carta.
La Parte 5 de momento no permite que el jugador de la fila de abajo pueda
tener 11 cartas, pues no puede robar una carta del mazo o de la pila de
descartes.
En esta imagen se han combinado algunas parejas de cartas de cada jugador.
El jugador con las cartas de la fila superior tiene 11 cartas y el programa
está esperando que eche a la pila de descartes una de ellas, antes de dejar
combinar las cartas de los dos jugadores.
Cómo robar una carta
Un jugador puede elegir robar una de estas dos cartas:
La carta superior del mazo, que está oculta.
La carta superior de la pila de descartes, que está visible.
El jugador que roba una carta debe tener 10 cartas:
En modo rápido: Se cambia la carta a la posición vacía de las 11 cartas
posibles de ese jugador.
En modo lento: Si se arrastra y se suelta la carta cerca de la posición
vacía, cambia la carta a esa posición. En caso contrario, devuelve la
carta a la posición inicial del mazo o de la pila de descartes.
Una vez robada la carta, dicho jugador tendrá 11 cartas y, a continuación,
tendrá que descartar una.
En esta Parte 5 del desarrollo solamente puede robar cartas el jugador de la
fila superior. Se hace con la macro CombinarCartas, cuando
detecta que se hace clic en una carta del mazo o de la pila de descartes.
Mira el vídeo de arriba en el que explico cómo robar una carta.
Cómo echar una carta a la pila de descartes
Si un jugador tiene 11 cartas, tiene que elegir una y echarla a la pila de
descartes. Se suele descartar la carta más difícil de combinar de todas.
Haciendo clic en una de las 11 cartas, la carta elegida se echa
automáticamente a la pila de descartes, sin necesidad de arrastrar y soltar
la carta, por lo que este proceso siempre funciona en modo rápido, aunque
esté seleccionado el modo lento del juego. Al descartar una carta se ejecuta
la macro DescartarCarta.
Descarga la Parte 5 de un Rabino en Excel
Descarga la Parte 5 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:
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:
♣️ Cómo guardar las cartas en la pila de descartes.
En esta imagen se ve el resultado de repartir 10 cartas a cada jugador y de
echar la primera carta en la pila de descartes.
En esta fase de desarrollo del juego se muestran todas las cartas hacia
arriba, lo que será diferente en las entregas de las próximas partes de este
Rabino. De momento, pienso que es más didáctico ver las cartas de los dos
jugadores que mostrar únicamente las cartas del jugador humano...
Cómo repartir las cartas de la baraja
Las cartas se reparten de dos en dos, alternando a cada jugador, o sea, las
primeras dos cartas a un jugador, las segundas dos cartas al otro jugador, y
así sucesivamente hasta que cada jugador tenga 10 cartas.
En la Parte 4 aún no pueden repartir las cartas los dos jugadores, solamente
el jugador humano que tiene las cartas colocadas en la fila de abajo.
Para que sea más realista el juego, hay que repartir cada carta moviéndola a
su posición según el criterio de reparto. No descarto que, en una fase más
avanzada del desarrollo, sea posible automatizar el reparto de las cartas
con sólo hacer clic en la primera carta del mazo barajado, sin necesidad de
moverlas a mano una a una...
El procedimiento actual de cómo repartir las cartas se podrá ver en un vídeo
que publicaré más abajo.
Las cartas se reparten con la macro RepartirCartas, que está en
el módulo: modReglas, siguiendo estos pasos:
1) Al hacer clic en una carta cualquiera se llama a la macro: ReglasJuego
2) Para determinar la carta tocada se llama a la macro: JugarCarta
3) Con la macro: BuscarCarta, se busca la fila y columna de la
carta jugada en la hoja 'CartasMapa'.
4) Siendo el estado del juego el caso 3 (variable iRegla) se
llama a la macro: RepartirCartas
5) Finaliza la macro si la carta no está en la columna 2 de la hoja
'CartasMapa', pues es la columna del mazo de cartas a repartir.
6) Si la carta está en la columna 2, llama a la macro:
MoverCartas, que permite mover la carta por todo el tapete.
7) Se analiza si la carta se ha dejado cerca de la posición donde hay
que repartir la carta, con la macro: ProbarEchar
8) Si la carta está bien repartida al jugador correcto y en la
posición correcta, se copia su valor a la siguiente posición libre de la
columna 4 de las hojas 'CartasMapa' y 'CartasVis'.
9) Si hay que mostrar la carta se hace cambiando la fórmula de la
forma de la carta.
10) Se coloca la carta repartida en su posición correcta con la macro:
ColocarCarta
11) Si la carta se ha dejado en cualquier sitio, vuelve a su posición
inicial dentro del mazo.
12) Una vez repartidas las 20 cartas, se cambia el estado del juego al
caso 4 (variable iRegla) y, al hacer clic en la siguiente carta del
mazo, la echa en la pila de descartes con la macro: ApilarCartas
El resultado final se muestra en la imagen de las hojas 'CartasMapa'
y 'CartasVis':
En la columna B están las cartas que aún quedan en el mazo. En la columna C
está la carta echada en la pila de descartes. En las columnas D y E están
las cartas de cada jugador. Las cartas de arriba corresponden a la columna D
y las cartas de abajo corresponden a la columna E.
Cómo colocar las cartas de cada jugador
Las cartas se van repartiendo de dos en dos de modo alterno a cada jugador,
colocadas en las posiciones indicadas en las columnas D y E de las hojas
'CartasTop' y 'CartasLeft'.
La fila 11 de esas columnas sirve para conocer la posición de la carta que
cada jugador robará del mazo o de la pila de descartes. Pero eso se verá en
la siguiente entrega, en la Parte 5 de este juego del Rabino.
Cómo guardar las cartas de cada jugador
La macro CopiarCartas mueve las cartas entre las columnas de las
hojas 'CartasMapa', con sus valores, y 'CartasVis', con su
visibilidad.
Cómo guardar las cartas en la pila de descartes
Con la macro ApilarCartas se echa una carta a la pila de descartes,
colocando la carta en una posición y con una rotación aleatorias, para echar
la carta de la forma más real posible. Y se llama a la macro
CopiarCartas para cambiar la carta de columna en las hojas
'CartasMapa' y 'CartasVis'.
Vídeo con la Parte 4 del juego
En este vídeo explico cómo repartir las cartas a los dos jugadores del
Rabino, y cómo echar cartas en la pila de descartes.
Descarga la Parte 4 de un Rabino en Excel
Descarga la Parte 4 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:
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:
Problema 2: Errores en la nube de OneDrive
-
🔝*To translate this blog post to your language, select it in the top left
Google box. *
Este año ha comenzado con dos problemas detectados en Microso...
Crea con IA tablas Excel de ejemplo
-
Crea con IA tablas Excel de ejemplo para practicar y simplificar tareas de
buscar datos o crearlos. A veces, encontrar el conjunto de datos perfecto
para...
What Does #### Mean in Microsoft Excel?
-
If you’re wondering what does #### mean in Excel, read this Microsoft Excel
guide until the end, and learn all the ways Excel uses the pound or number
sign...
3DFrame-NLGeom
-
The VBA version of the 3DFrame spreadsheet has now been updated to allow
geometric non-linear effects to be included. The new version can be
downloaded fro...
Happy Excel Day 45678
-
Where does the time go? Two years ago, we were celebrating Excel Day 45000,
and suddenly it’s Excel Day 45678! Do you have any special events planned?
If n...
FREE 4 Hours Complete Excel Course
-
FREE 4 Hours Complete Excel Course Here is a FREE, complete end-to-end
Excel course to help you learn all the key and essential aspects of
Microsoft Exce...
Análisis DAFO (FODA, DOFA) las decisiones con Excel
-
Para conocer la situación de una empresa, proyecto o persona, recurrimos al
análisis DAFO (FODA, DOFA) en la toma de decisiones con Excel. El los años
sese...
How To Predict Bearing Life With Excel
-
When you work in mechanical engineering, understanding the reliability and
performance of bearings under various conditions is crucial. Bearings are
the co...
TikTok’s search evolution
-
2 in 5 Americans use TikTok as a search engine. Nearly 1 in 10 Gen Zers are
more likely to rely on TikTok than Google as a search engine. More than
half of...
Unblocking and Enabling Macros
-
When Windows detects that a file has come from a computer other than the
one you're using, it marks the file as coming from the web, and blocks the
file....
Office Scripts: Trabajando con Tablas
-
[image: Office Scripts: Trabajando con Tablas]
Me he dado cuenta que últimamente solo escribo de lenguaje M (es mi pequeño
vicio)... pero hay que liberar l...
La importancia de saber mecanografía en 2022
-
[image: Resultado de imagen de mecanografía viñeta escribiendo a máquina]
Según la RAE, la mecanografía es el arte de escribir a máquina. Hace unos
cuantos...
London Excel Meetup Workbooks
-
The workbooks used in my presentation on “Analytical and Interactive
Dashboards in Excel” at the London Excel Meetup, September 3, 2020
Agenda Perpetua Excel Calendario Perpetuo
-
Saludos a los ingenieros y a todos los que forman parte de nuestra
comunidad de planillas Excel para ingeniería civil, ya se vienen las
fiestas navideñas y...
International Keyboard Shortcut Day 2019
-
The first Wednesday of every November is International Keyboard Shortcut
Day. This Wednesday, people from all over the world will become far less
efficient...
Welcome, Prashanth!
-
Last March, I shared that we were starting to look for a new CEO for Stack
Overflow. We were looking for that rare combination of someone who… Read
more "W...
Salvador Sostres, analfabeto profesional
-
Los nuevos tiempos traen nuevas profesiones. Internet, además, ha
revolucionado el mundo del periodismo y la palabra escrita. Adaptarse o
morir, ese es el ...
Planificación de compras
-
Realizar una lista con los productos que necesitamos y que formarán parte
de nuestra cesta de la compra nos ayuda a *encontrar la combinación de
bienes p...
Mis metas son seguir superando nuevos retos en Excel y compartirlos en mi blog, para sacarle todo el poder a esta excelente herramienta multiusos, tan usada y a la vez tan incomprendida, para así poder mejorar nuestros conocimientos de Excel.
