Traducir el blog
Montaña Rusa Excel Roller Coaster
¿Una montaña rusa en Excel?
Hace años me hice amigo de George Lungu, cuando me enteré por casualidad que era el autor de una hoja con una "roller coaster" en inglés, o sea una "montaña rusa" en español (¿ahora se debería decir "montaña ucraniana"?) hecha enteramente en Excel y con unas pocas macros.
¡IMPRESIONANTE! ¡ASOMBROSA! ¡EXCELENTE!
Cuando George Lungu comenzó a publicar su blog hace 11 años, escribí el siguiente artículo maravillado por su gran talento:
Este es el aspecto de la "montaña rusa":
Hace unos días carlos barboza publicó un vídeo con la "montaña rusa" en este enlace:
A 3D Animated Roller Coaster Model on spreadsheet | carlos barboza | LinkedIn
El autor del vídeo original George Lungu comentó lo siguiente:
En el nuevo Excel es bastante lento (alrededor de 4 veces más lento que en el antiguo Excel 2003). Tendré que rehacerlo sin el gráfico, redefiniendo los vértices y los segmentos entre ellos como segmentos libres. (no en un gráfico) durante cada fotograma. Eso debe acelerarlo considerablemente. Ustedes me dieron algo que hacer :).
Le comenté lo siguiente:
George Lungu, no necesitas rehacer nada. En Excel para Microsoft 365 funciona bien y tarda menos de un minuto en completar la vuelta. Lo que si me he atrevido es a rehacer las macros, que publicaré con tu permiso en mi tablón de LinkedIn.
Y es lo que hice en esta publicación: Roller Coaster | ExcelPedroWave | LinkedIn
Ahora voy a publicar un revisión de las macros originales de George Lungu, para intentar montarme en la "montaña rusa" en cualquier versión a partir de Excel 2010.
En este vídeo la he probado en Excel para Microsoft 365, completando la vuelta en unos 24 segundos con un retardo de 20 milisegundos.
He intentado mejorar la "montaña rusa" con una mínima reingeniería en VBA para:
- Guardar el archivo como .xlsm, compatible a partir de Excel 2007 y que ocupa menos tamaño, por ser guardado en formato XML comprimido en ZIP.
- Proteger las hojas 'Roller Coaster' y 'Calculations' sin contraseña, para lo que únicamente ha hecho falta desbloquear algunas celdas.
- Poner en la hoja 'Calculations' un 0 en AG45, un 1 en AG46 y un 2 en AG76 para que el reseteo sea a velocidad 0 y la vuelta comience a velocidad 1.
- Guardar en la hoja 'Calculations' solamente las macros para los controles de número (Forms.SpinButton) alineados.
- Crear un módulo 'modCoaster' con las macros de George modificadas ¡y comentadas!
- Editar la macro 'Go_' para arrancar y pausar la vuelta, haciendo clic en el sol o estrella: Go 🌞
- Modificar la macro para que el índice, Index de la celda C21, se calcule sin decimales...
- Cambiar el nombre de la variable n por: Private bLoop As Boolean
- Quitar las macros sobrantes hechas con el grabador de macros.
- Añadir: Option Explicit en honor a Jordan Morris Goldmeier.
Lo que nunca he pretendido ha sido modificar la lógica de las fórmulas de George Lungu, que consiguen mover la "montaña rusa" en un gráfico de dispersión con líneas suavizadas, por lo que casi todos los cambios los he hecho en las macros.
Lo que he tratado de resolver es la gran diferencia de tiempos que tarda una vuelta en mis dos portátiles con la versión original, que se puede descargar desde aquí:
Animated Roller Coaster in Excel – Excel Unusual
- Tarda de 57 a 62 segundos en mi viejo portátil, con Excel 2010 en Windows 7 y con una tarjeta gráfica ATI Radeon.
- Tarda de 11 a 13 segundos en mi nuevo portátil, con Excel para Microsoft 365 en Windows 11 y con una tarjeta gráfica NVIDIA.
Lo que quiero es que la vuelta dure aproximadamente lo mismo en mis dos portátiles, para lo que he añadido un retardo, obteniendo estos tiempos:
- Con un retardo de 20 milisegundos consigo unos 70 segundos por vuelta en mi viejo portátil.
- Con un retardo de 100 milisegundos consigo unos 70 segundos por vuelta en mi nuevo portátil.
Tiempos inferiores no me satisfacen, por ser una velocidad demasiado elevada para disfrutar de la vuelta...
Estas son la macros, modificadas con el permiso de George Lungu, en el módulo modCoaster:
He incluido la función Timer y la función Sleep, sabiendo que esta última es una mala elección, pero la he incluido para comparar el efecto de las dos funciones.
Un desplegable en la celda A24 de la hoja 'Calculations' permite elegir entre: Delay (con la función Timer) y Sleep (con la función Sleep).
En la celda B24 se introduce el retardo en milisegundos, de uno en uno o de diez en diez, con el control de número ActiveX de la derecha.
El número total de segundos que se tarda en dar una vuelta se informa en la celda B26.
La posición de la "montaña rusa" se puede modificar con el índice, Index de la celda C21.
También he añadido una barra de desplazamiento para modificar fácilmente el índice, pudiendo cambiar de uno en uno o de diez en diez.
Incluso se puede mover en sentido inverso, gracias a esa barra de desplazamiento.
Otra característica nueva es la posibilidad de pausar la "montaña rusa" con el mismo botón con el que se arranca, ese icono con un sol. 🌞
Puedes descargar esta montaña rusa v1.0 desde estos enlaces:
- Microsoft OneDrive: Coaster7_short-may2022_delay-PW1.xlsm
- Sites Google Drive: Coaster7_short-may2022_delay-PW1.xlsm
Abre la plantilla con una versión de Excel de escritorio igual o superior a Excel 2007 y presiona el botón: Habilitar edición
Aparece una ADVERTENCIA DE SEGURIDAD: Las macros se han deshabilitado. Presiona el botón: Habilitar contenido
Esta plantilla contiene macros y no está protegida, por lo que se pueden estudiar y analizar las fórmulas y el código VBA, gracias a que su autor original la compartió así desde que la publicó hace más de 11 años.
George Lungu me ha mandado este fin de semana un par de versiones nuevas de la "montaña rusa" para probarlas.
¡Y me ha vuelto a dejar impresionado!
¡Este hombre no tiene límites en Excel!
George acaba de subir un vídeo con los cambios en la montaña rusa que ha hecho últimamente.
Traducción de la descripción del vídeo:
Por demanda popular, vuelvo a Excel después de un largo paréntesis. Y esta vez lo haré a lo grande.
Agregué algunas características al modelo de montaña rusa de la siguiente manera:
1) Registro de rendimiento
2) Todo tipo de colores y selección de esquemas de color.
3) control de velocidad
4) Ajuste de la longitud del posavasos
5) Ajuste del tamaño del plano de tierra (malla)
Todo este modelo se reconstruirá desde cero con mucha mejor velocidad (en el nuevo Excel) y una variedad de pistas. También mentiría para hacerlo ajustable, de modo que los usuarios puedan crear sus propias pistas personalizadas.
¡¡¡Gracias por su apoyo!!!
Se puede descargar desde aquí:
A 3D Animated Excel Roller Coaster – video preview – Excel Unusual
¡¡¡ Disfruta del viaje !!!
Mi lista de blogs
-
Regresos 14 – (2) Bases de cuatro cubos con suma cero - En la anterior entrada estudiamos las sumas de cubos cuyas bases suman cero. En esta otra ampliaremos el estudio a cuatro cubos. *Sumas con cua...Hace 9 horas
-
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...Hace 1 día
-
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...Hace 2 días
-
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...Hace 2 días
-
Cómo graficar totales de una tabla dinámica en Excel - Las tablas dinámicas son una de las herramientas más poderosas en Excel para organizar y analizar grandes cantidades de datos. Sin embargo, cuando necesi...Hace 3 días
-
OBTENER LA TENDENCIA EN POWER APPS CALCULANDO LA PENDIENTE - Hola a todos, He estado estos días implementando un nuevo input en el borrador de un proyecto de Apps que estoy creando. Se trata de … La entrada OBTENE...Hace 3 días
-
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...Hace 5 días
-
Fin - Llevo tiempo pensando esta entrada y no sé que decir. Analisis y Decisión nació en 2008 y no ... Leer más »Hace 1 semana
-
Validación de Datos en Excel: de lo Básico a lo Avanzado - En Excel, uno de los errores más comunes es dar por sentado que sabemos lo básico. Muchas personas que se […] The post Validación de Datos en Excel: de l...Hace 1 semana
-
📊🔎 Cómo usar SI y UNIRCADENAS para manejar múltiples resultados en un búsqueda - ¿Cómo buscar múltiples resultados en Excel y unirlos en una sola celda?Si has trabajado con Excel, seguramente conoces la función BUSCARV, que permite enco...Hace 2 semanas
-
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...Hace 4 semanas
-
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...Hace 1 mes
-
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...Hace 3 meses
-
Color, Conditions, and Copilot: How to save time using conditional formatting with Copilot in Excel - Hi everyone, this is part 11 in a series of posts to show you some of the things that are possible to do with Copilot in Excel. *What is conditional f...Hace 3 meses
-
4 ejemplos de utilización de validación de datos con fórmulas - Ya sabes que la herramienta de Validación de datos es de gran utilidad para controlar y restringir la introducción de datos y así, asegurarte de…Hace 5 meses
-
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...Hace 5 meses
-
-
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...Hace 10 meses
-
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....Hace 1 año
-
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...Hace 2 años
-
Hello world! - [image: Hello world!] Welcome to WordPress. This is your first post. Edit or delete it, then start writing!Hace 2 años
-
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...Hace 2 años
-
London Excel Meetup Workbooks - The workbooks used in my presentation on “Analytical and Interactive Dashboards in Excel” at the London Excel Meetup, September 3, 2020Hace 4 años
-
Cálculo de jornada que termina al día siguiente (Power Query) y despedida - [image: Cálculo de jornada que termina al día siguiente (Power Query) y despedida] Este blog se ha ocupado de cálculos de tiempo con bastante intensidad, c...Hace 4 años
-
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...Hace 5 años
-
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...Hace 5 años
-
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...Hace 5 años
-
Visualize parts and whole - combine clustered column and stacked column charts - *Inga: Disa what?* *Igor: -ppeared.* by The FrankensTeam ------------------------------ Really it was 3 years ago we posted our last article? *Freddy: Th...Hace 5 años
-
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 ...Hace 6 años
-
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...Hace 12 años
-
-
-
-
-
-
-
-
-
1 Response to "Montaña Rusa Excel Roller Coaster"
George acaba de subir un vídeo mostrando los cambios que ha hecho últimamente a su montaña rusa: Excel Roller Coaster Update #1
Leave A Reply
Indícame las erratas que encuentres y qué es lo que te gustaría ver en los próximos artículos.