Formula1 3D Menu Excel

Posted on mayo 30, 2022 by Excel Pedro Wave

🔝To change the language of this blog post, choose it from the Google box at the top left.

ACTUALIZACIÓN del 20 de noviembre: Descarga abajo la versión 1.15 con los datos de la última carrera de esta temporada en Emiratos Árabes Unidos.

Se me ha ocurrido adaptar una plantilla de la interesante página de ExcelVisual, con la autorización de su autor original (enlace a Twitter), para visualizar datos de la Formula1 con un Menú 3D que simula un efecto de gamificación al seleccionar un piloto de carreras.

En un artículo anterior presenté el Menú 3D en su versión original y le di todo el crédito a su autor:

Impresionante Excel Visual | #ExcelPedroWave

Ahora verás cómo he creado este nuevo Menú 3D de Formula1 en Excel, con el siguiente aspecto visual:

Vídeo del nuevo Menú 3D

El resultado se aprecia mejor en este vídeo con datos de la Formula1:

Características del nuevo Menú 3D

Para tratar de hacer que este Menú 3D sea más fácil de usar, he modificado las hojas originales:

Traduciendo todo al inglés. En la versión original había una mezcla de inglés y ruso.
Eliminando datos del Menú 3D de la hoja 'DASHBOARD' y conteniendo únicamente objetos visuales, con lo que se ha separado la capa de presentación visual (frontend - interfaz de usuario) de la capa de acceso a datos (backend - procesamiento de datos).
Añadiendo un nuevo dato a la hoja 'DASHBOARD' para modificar la velocidad (Speed) de rotación del Menú 3D, de 1 (mínima) a 7 (máxima).
Consolidando todos los datos del Menú 3D en la hoja 'MENU', incluidos los que había en la hoja 'Processing'.
Protegiendo todas las hojas sin contraseña.
Eliminando el mapa de calor de USA, hecho con tantas formas como estados USA.
Añadiendo un gráfico de mapa coroplético, fácilmente programable para visualizar todos los países del mundo, aunque solamente está incluido en las versiones recientes de Excel 2019, Excel 2021 y Excel para Microsoft 365.
Usando la herramienta de cámara de Excel para incrustar los datos de los equipos y los pilotos de Formula1.
Insertando un gráfico de línea de tiempo (timeline chart) para visualizar los ganadores de las carreras de Formula1.
Creando unos cuantos nombres definidos para las celdas y los rangos de la hoja 'MENU':

Hojas del Menú 3D

He adaptado las hojas para visualizar datos de la Formula1.

Hoja 'DASHBOARD': Contiene todos los elementos visuales.

FORMULA1 3D MENU: Con los 5 pilotos de Formula1 y la posibilidad de visualizarlos todos a la vez. Además con el nuevo cambio de velocidad: Speed, con 7 velocidades: de x1 a x7.

TEAMS: Con 3 equipos de Formula1 mediante captura de cámara que, al ser muy lenta de refresco, obliga a ocultarla durante el efecto carrusel.

DRIVERS: Con 5 pilotos de Formula1 mediante captura de cámara que, al ser muy lenta de refresco, obliga a ocultarla durante el efecto carrusel.

COUNTRIES: Con los países de los pilotos mediante segmentación de datos de países y de grupos de países por: Driver; Team; Win1; Win2; Win3, con los países donde han ganado carreras los 3 primeros pilotos.

MAP: Con un mapa coroplético automático, visualizando solo regiones con datos y mostrando todas las etiquetas.

RACES: Con un gráfico de línea de tiempo con las carreras de Formula1 celebradas en 2022, pudiendo seleccionar por fecha de las carreras con una segmentación de datos.

Hoja 'MENU' con los datos del Menú 3D:

Posición: myPosStart en la celda B2 y myPosEnd en la celda B3.
My drive: valor del piloto seleccionado con myMenu en la celda B4.
New: identifica al nuevo piloto con myMenuNew en la celda B5.
Old: identifica al viejo piloto con myMenuOld en la celda B11.
Drivers: Los 5 pilotos en el rango B6:B10.
Width: Columna C con el ancho de las imágenes de cada piloto cuando gira el Menú 3D.
Height: Columna D con el alto de las imágenes de cada piloto cuando gira el Menú 3D.
Keys: Columna E con las claves del movimiento de las imágenes cuando gira el Menú 3D.
Opt Pos: Columna F con la posición de las 5 imágenes de los pilotos.
P1 a P5: Posición de las imágenes en el rango F2:K6.
L1 a L5: Bucles de las imágenes en el rango L2:P5.

Hoja 'MALL' con datos e imágenes de los 5 pilotos y sus equipos.

Hojas 'M1' a 'M5' con datos e imágenes de cada piloto y su equipo.

Hoja 'MAP' con la tabla de países filtrada por el piloto elegido, por ejemplo M1 para Carlos Sainz.

Country: País.
Group: con el grupo del país del piloto (Driver), del equipo (Team) y de los 3 primeros premios de las carreras (Win1, Win2, Win3).
Driver: con la identificación de los pilotos de M1 a M5.

Hoja 'RACES' con las carreras filtradas por fecha y piloto.

Date: Fecha de la carrera.
Race: Ciudad del circuito de carreras.
Winner: Posición en el pódium de los ganadores de cada carrera, debiendo editar un 3 para el primero; un 2 para el segundo y un 1 para el tercero.
Driver: con la identificación de los pilotos de M1 a M5.
Name: nombre del piloto.

Macros del nuevo Menú 3D

He intentado mejorar las macros VBA del modelo original de ExcelVisual:

Añadiendo indentación en las macros para que sean más fáciles de leer.
Añadiendo información de cada macro, como autor original y fecha de último cambio.
Simplificando las macros con nombres definidos y usando la instrucción With.
Referenciando rangos de la hoja 'MENU'.
Separando las macros del Menú 3D del resto de macros.
Retrasando la ejecución de los bucles durante el movimiento con efecto carrusel.

Las macros que mueven el Menú 3D y lo hacen interactivo son las siguientes en cada módulo:

Module1_Optmenu: con la macro que selecciona al piloto.

Optmenu: Obtiene el piloto elegido con la propiedad Application.Caller, que devuelve el nombre del objeto seleccionado, en este caso la imagen de un piloto en el Menú 3D.

' ----------------------------------------------------------------------------------------------------------------------------------
'   VBA Project:    Formula1 3D Menu Excel
'   Module:         Module1_Optmenu
'   Author:         lux, https://exceltable.com/en/templates/3d-menu-for-dashboard-in-excel
'   Copyright:      © 2022 by Pedro Wave, https://pedrowave.blogspot.com
'   Last edit:      2022-05-30 by Pedro Wave
'   Purpose:        3D Menu Option
' ----------------------------------------------------------------------------------------------------------------------------------

Option Explicit

Sub Optmenu()
'
' 3D Menu Option
'
    Dim iMenu As Integer
    Dim arr As Variant
    Dim iValue As Integer
    
    iMenu = Right$(Application.Caller, 1)
    
    arr = Range("Range_PosEnd")
    
    iValue = arr(1, iMenu)
    iValue = iValue - IIf(iValue > 360, 360, 0)
    
    With Range("myPosEnd")
        
        If .Value = iValue Then Exit Sub
        
        With Sheets("DASHBOARD")
            .Shapes("Image Drivers").Visible = msoFalse
            .Shapes("Image Teams").Visible = msoFalse
        End With
        
        Range("myPosStart").Value = .Value
        .Value = arr(WorksheetFunction.Match(.Value, Range("Range_OptPos"), 0), iMenu)
        
        Call CircularMotionMenu
        
        .Value = .Value - IIf(.Value > 360, 360, 0)
            
    End With
        
    Range("myMenu").Value = iMenu
    Range("myMenuNew").Value = iMenu
    
    VisualF1 "M" & iMenu

End Sub

Module2_CircularMotion: Con las macros que producen el efecto carrusel.

CircularMotionMenu: Bucle para girar el Menú 3D en el sentido de las agujas del reloj.
ChangeSpeed: Función para obtener el cambio de velocidades de rotación del carrusel.
WaitDelay: Macro para retardar la ejecución del movimiento circular, cediendo la ejecución a otros procesos del sistema operativo mediante la función DoEvents.
Incluye 3 constantes necesarias para el movimiento circular del Menú 3D.

' ----------------------------------------------------------------------------------------------------------------------------------
'   VBA Project:    Formula1 3D Menu Excel
'   Module:         Module2_CircularMotion
'   Author:         lux, https://exceltable.com/en/templates/3d-menu-for-dashboard-in-excel
'   Copyright:      © 2022 by Pedro Wave, https://pedrowave.blogspot.com
'   Last edit:      2022-06-05 by Pedro Wave
'   Purpose:        Circular Motion 3D Menu
' ----------------------------------------------------------------------------------------------------------------------------------

Option Explicit

Public Const CTE_SCALEW As Single = 1.2
Public Const CTE_SCALEH As Single = 0.4
Private Const CTE_TEMPO As Integer = 5

Sub CircularMotionMenu()
'
' Circular Motion 3D Menu
'
    Dim carousel As ChartObject
    Dim arrSizes As Variant
    Dim arrLoop As Variant
    Dim iLoop As Integer
    Dim iPosStart As Integer
    Dim iPosEnd As Integer
    Dim iStart As Integer
    Dim iEnd As Integer
    Dim iKey As Integer
    Dim ii As Integer
    Dim li As Long
    Dim bSum As Boolean
    Dim sgSpeed As Single
    
    Set carousel = Sheets("DASHBOARD").ChartObjects("Carousel1")
    
    iPosStart = Range("myPosStart").Value
    iPosEnd = Range("myPosEnd").Value
    iStart = Int(iPosStart / CTE_TEMPO)
    iEnd = Int(iPosEnd / CTE_TEMPO)
    
    arrLoop = Range("Range_Loop")
    
    sgSpeed = ChangeSpeed
    
    For iLoop = iStart To iEnd
        
        WaitDelay sgSpeed
        
        carousel.Activate
        ActiveChart.PlotArea.Format.ThreeD.RotationX = -iLoop * CTE_TEMPO
        
        For ii = 1 To 5
            
            With Sheets("DASHBOARD").Shapes("OptionGroup" & ii)
                
                .Left = ActiveChart.SeriesCollection(1).Points(ii).DataLabel.Left + carousel.Left
                .Top = ActiveChart.SeriesCollection(1).Points(ii).DataLabel.Top + carousel.Top
            
                Select Case ii
                    Case 1, 2, 3
                        bSum = (iLoop < arrLoop(1, ii) Or iLoop > arrLoop(2, ii)) And (iLoop < arrLoop(3, ii) Or iLoop > arrLoop(4, ii))
                    Case 4, 5
                        bSum = Not ((iLoop < arrLoop(1, ii) Or iLoop > arrLoop(2, ii)) And (iLoop < arrLoop(3, ii) Or iLoop > arrLoop(4, ii)))
                End Select
                
                .Width = .Width + CTE_SCALEW * IIf(bSum, 1, -1)
                .Height = .Height + CTE_SCALEH * IIf(bSum, 1, -1)
            
            End With
        
        Next ii
    
    Next iLoop

    arrSizes = Range("Range_Sizes")
    
    iKey = (iPosEnd - IIf(iPosEnd > 360, 360, 0)) * 10
    
    For ii = 1 To 5
    
        With Sheets("DASHBOARD").Shapes("OptionGroup" & ii)
            li = WorksheetFunction.Match(iKey + ii, Range("Range_Keys"), 0)
            .Width = arrSizes(li, 1) + CTE_SCALEW
            .Height = arrSizes(li, 2) + CTE_SCALEH
        End With
    
    Next ii

End Sub

Function ChangeSpeed() As Single
'
' Change circular motion speed
'
    ChangeSpeed = (11 - Range("mySpeed").Value2) * 0.01

End Function

Sub WaitDelay(sgSpeed As Single)
'
' Waiting with a delay
'
    Dim sgTimer As Single
    
    ' Set timer
    sgTimer = Timer + sgSpeed
    ' Loop with the delay
    Do
        ' Yield to other processes
        DoEvents
        DoEvents
        DoEvents
    Loop While Timer < sgTimer

End Sub

Module3_Transformer: Con las macros que transforman el carrusel en todos los pilotos o en un piloto.

TransformerMenu: Transforma el Menú 3D para visualizar a todos los pilotos.
UntransformerMenu: Transforma el Menú 3D para visualizar a un único piloto.

' ----------------------------------------------------------------------------------------------------------------------------------
'   VBA Project:    Formula1 3D Menu Excel
'   Module:         Module3_Transformer
'   Author:         lux, https://exceltable.com/en/templates/3d-menu-for-dashboard-in-excel
'   Copyright:      © 2022 by Pedro Wave, https://pedrowave.blogspot.com
'   Last edit:      2022-06-05 by Pedro Wave
'   Purpose:        3D Menu Transformer
' ----------------------------------------------------------------------------------------------------------------------------------

Option Explicit

Sub TransformerMenu()
'
' 3D Menu Transformer
'
    Dim chCarousel As ChartObject
    Dim sgOptGroup As Integer
    Dim iScaleWH As Integer
    Dim ii As Integer
    Dim ij As Integer
    Dim iStart As Integer
    Dim sgSpeed As Single
    
    With Sheets("DASHBOARD")
    
        .Shapes("Image Drivers").Visible = msoFalse
        .Shapes("Image Teams").Visible = msoFalse
        
        Set chCarousel = .ChartObjects("Carousel1")
        
        Range("myMenuOld").Value = Range("myMenuNew").Value
        
        sgOptGroup = .Shapes("OptionGroup1").Width
        
        sgSpeed = ChangeSpeed
        
        For ii = 0 To 10
        
            WaitDelay sgSpeed
        
            iScaleWH = ii * 5
            
            For ij = 1 To 5
            
                With .Shapes("OptionGroup" & ij)
                    .Width = sgOptGroup * (100 - iScaleWH) / 100
                    .Left = .Left + iScaleWH / 10
                End With
            
            Next ij
            
        Next ii
        
        .Shapes("SelectNum").Visible = msoFalse
        
        For ij = 1 To 5
            .Shapes("OptionGroup" & ij).Visible = msoFalse
        Next ij
    
        UnprotectSheet .Name
    
    End With
    
    With Sheets("DASHBOARD").ChartObjects("Together")
    
        .Visible = msoTrue
        .Top = chCarousel.Top - 8
        .Left = chCarousel.Left + 20
        .Width = chCarousel.Width + 31
        .Height = chCarousel.Height + 57
    
        For ii = 0 To 20
        
            WaitDelay sgSpeed
        
            iStart = 15 + ii * 4
            .Height = .Height - 8
            .Activate
            ActiveChart.PlotArea.Format.ThreeD.RotationY = iStart
            ActiveChart.PlotArea.Format.ThreeD.RotationX = -iStart
            ActiveChart.SeriesCollection(1).Explosion = 400 - (ii * 5 * 4)

        Next ii
    
    End With
        
    ProtectSheet "DASHBOARD"
        
    Range("myMenuNew").Value = "ALL"
    
    VisualF1 "MALL"

End Sub

Sub UntransformerMenu()
'
' 3D Menu Untransformer
'
    Dim chTogether As ChartObject
    Dim sgOptGroup As Single
    Dim iScaleWH As Integer
    Dim iKey As Integer
    Dim arr As Variant
    Dim ii As Integer
    Dim ij As Integer
    Dim li As Long
    Dim iStart As Integer
    Dim sNew As String
    Dim sgSpeed As Single
    
    arr = Range("Range_Sizes")
    
    With Sheets("DASHBOARD")
    
        .Shapes("Image Drivers").Visible = msoFalse
        .Shapes("Image Teams").Visible = msoFalse
        
        Set chTogether = .ChartObjects("Together")
        
        sgOptGroup = .Shapes("OptionGroup1").Width
        
        .Shapes("ALL").Visible = msoFalse
        .Shapes("SelectNum").Visible = msoTrue
        
        UnprotectSheet .Name
        
        sgSpeed = ChangeSpeed
        
        For ii = 0 To 20
        
            WaitDelay sgSpeed
        
            iStart = 15 + ii * 4
            chTogether.Height = chTogether.Height + 8
            chTogether.Activate
            ActiveChart.PlotArea.Format.ThreeD.RotationY = 110 - iStart
            ActiveChart.PlotArea.Format.ThreeD.RotationX = iStart
            
            ActiveChart.SeriesCollection(1).Explosion = ii * 5 * 4
            
        Next ii
        
        ProtectSheet .Name
        
        chTogether.Activate
        ActiveChart.PlotArea.Format.ThreeD.RotationX = 0
        chTogether.Visible = msoFalse
        
        For ij = 1 To 5
            .Shapes("OptionGroup" & ij).Visible = msoTrue
        Next ij
    
        For ii = 0 To 10
        
            WaitDelay sgSpeed
        
            iScaleWH = ii * 5
            
            For ij = 1 To 5
                
                With .Shapes("OptionGroup" & ij)
                    .Width = sgOptGroup * (100 + iScaleWH) / 100
                    .Left = .Left - iScaleWH / 10
                End With
            
            Next ij
            
        Next ii
        
        iKey = Range("myPosEnd").Value * 10
            
        For ij = 1 To 5
        
            With .Shapes("OptionGroup" & ij)
                li = WorksheetFunction.Match(iKey + ij, Range("Range_Keys"), 0)
                .Width = arr(li, 1) + CTE_SCALEW
                .Height = arr(li, 2) + CTE_SCALEH
            End With
        
        Next ij
    
    End With
    
    sNew = Range("myMenuOld").Value
    Range("myMenuNew").Value = sNew
    
    VisualF1 "M" & sNew

End Sub

Module4_Formula1: Con las macros que visualizan los datos de los pilotos de Formula1.

VisualF1: Lanza las macros de los pilotos.
ChangeCameras: Macro para cambiar las herramientas de cámara de Excel.
ChangeMap: Macro para filtrar la tabla de países que se verán en el gráfico de mapa coroplético.
ChangeRaces: Macro para filtrar el gráfico de línea de tiempo con las carreras de Formula1. Observa como consigo crear un pódium con los 3 pilotos ganadores de cada carrera. Los valores del campo Winner en la tabla son: 3, 2 y 1 para que en el gráfico tenga más altura el piloto ganador. Se convierten en los puestos 1, 2 y 3 gracias a un formato de celdas de número personalizado del tipo: [>2]1;[<2]3;0
ProtectSheet: Macro para proteger una hoja.
UnprotectSheet: Macro para desproteger una hoja.

' ----------------------------------------------------------------------------------------------------------------------------------
'   VBA Project:    Formula1 3D Menu Excel
'   Module:         Module4_Formula1
'   Author:         lux, https://exceltable.com/en/templates/3d-menu-for-dashboard-in-excel
'   Copyright:      © 2022 by Pedro Wave, https://pedrowave.blogspot.com
'   Last edit:      2022-05-30 by Pedro Wave
'   Purpose:        Formula1 data visualization
' ----------------------------------------------------------------------------------------------------------------------------------

Option Explicit

Sub VisualF1(sMenu As String)
'
' Formula1 data visualization
' sMenu: MALL, M1 to M5
'
    Application.ScreenUpdating = False
    
    ChangeCameras sMenu
    
    ChangeMap sMenu
        
    ChangeRaces sMenu
    
    Range("mySpeed").Select
    
    Application.ScreenUpdating = True
    
End Sub

Sub ChangeCameras(sMenu As String)
'
' Change drivers and teams with the Excel camera tool
'
    With Sheets("DASHBOARD")
    
        If sMenu = "MALL" Then
            .Shapes("ALL").Visible = msoTrue
        End If
        
        With .Shapes("Image Drivers")
            .Visible = msoTrue
            .Select
            Selection.Formula = "='" & sMenu & "'!A1:E6"
        End With
    
        With .Shapes("Image Teams")
            .Visible = msoTrue
            .Select
            Selection.Formula = "='" & sMenu & "'!A8:E19"
        End With
        
    End With

End Sub

Sub ChangeMap(sMenu As String)
'
' Change map
'
    With Sheets("MAP")
    
        UnprotectSheet .Name
        
        With .ListObjects("TableMap").Range
            If sMenu = "MALL" Then
                .AutoFilter Field:=3
            Else
                .AutoFilter Field:=3, Criteria1:=sMenu
            End If
        End With
        
        ProtectSheet .Name
    
    End With

End Sub

Sub ChangeRaces(sMenu As String)
'
' Change races winners
'
    Dim lFilas As Long
    
    lFilas = Application.WorksheetFunction.CountA(Range("RACES!A:A"))
    
    With Sheets("RACES")
    
        UnprotectSheet .Name
        
        With .ListObjects("TableRaces").Range
            If sMenu = "MALL" Then
                .AutoFilter Field:=4
            Else
                .AutoFilter Field:=4, Criteria1:=sMenu
            End If
        End With
        
        ProtectSheet .Name
    
    End With
    
    With Sheets("DASHBOARD")
    
        UnprotectSheet .Name
    
        .ChartObjects("Graph Races").Activate
        
        On Error GoTo ERR1
        
        ActiveChart.FullSeriesCollection(1).XValues = "=RACES!A2:B" & lFilas
        ActiveChart.FullSeriesCollection(1).ApplyDataLabels
        
        ActiveChart.FullSeriesCollection(1).DataLabels.Select
        With Selection.Format.TextFrame2.TextRange.Font.Fill
            .Visible = msoTrue
            .ForeColor.ObjectThemeColor = msoThemeColorBackground1
            .ForeColor.TintAndShade = 0
            .ForeColor.Brightness = 0
            .Transparency = 0
            .Solid
        End With
        
        ActiveChart.SeriesCollection(1).DataLabels.Format.TextFrame2.TextRange. _
            InsertChartField msoChartFieldRange, "=RACES!E2:E" & lFilas, 0
        Selection.ShowRange = True
        Selection.Separator = "" & Chr(13) & ""
        
        ActiveChart.FullSeriesCollection(1).DataLabels.NumberFormatLinked = 0
        Selection.NumberFormat = "[>2]1;[<2]3;0"
        
        With ActiveChart.Axes(xlCategory)
            .Select
            If sMenu = "MALL" Then
                .TickLabelSpacing = 3
                .TickMarkSpacing = 3
            Else
                .TickLabelSpacing = 1
                .TickMarkSpacing = 1
            End If
        End With
        
ERR1:
        ProtectSheet .Name

    End With

End Sub

Sub ProtectSheet(sSheet As String)
'
' Protect sheet
'
    With Sheets(sSheet)
        If sSheet = "DASHBOARD" Then
            .Protect DrawingObjects:=False, Contents:=True, Scenarios:=True
        Else
            .Protect DrawingObjects:=True, Contents:=True, Scenarios:=True, AllowFiltering:=True
        End If
    End With
    
End Sub

Sub UnprotectSheet(sSheet As String)
'
' Protect sheet
'
    Sheets(sSheet).Unprotect
    
End Sub

Descarga del Menú 3D de Formula1

ACTUALIZADO: 2022-11-21 con la última carrera de esta temporada el 20 de noviembre en Emiratos Árabes Unidos.

Puedes descargar este nuevo Menú 3D con datos de 5 pilotos de Formula1 v1.14 desde estos enlaces:

Microsoft OneDrive: Formula1 3D Menu Excel - PW1.xlsm

Sites Google Drive: Formula1 3D Menu Excel - PW1.xlsm

Abre la plantilla con una versión de Excel de escritorio igual o superior a Excel 2019 y presiona el botón: Habilitar edición

Aparece RIESGO DE SEGURIDAD Microsoft ha bloqueado la ejecución de macros porque el origen de este archivo no es de confianza. Con un botón: Obtener más información

Para desbloquear el archivo se debe abrir el Explorador de archivos y hacer clic con el botón derecho del ratón sobre el archivo, seleccionando Propiedades.

Marcar la casilla: Desbloquear y hacer clic en el botón: Aplicar

Abrir el archivo de nuevo, apareciendo 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.

Si te gusta, gracias por tus comentarios y por compartir este artículo en tus redes de entusiastas de Excel.

15 Response to "Formula1 3D Menu Excel"

Excel Pedro Wave Says....

02 junio, 2022 09:43

ecotrend, I would greatly appreciate any feedback about my adaptation of your 3D Menu. Especially regarding the improvements of your macros.

Anónimo Says....

02 junio, 2022 09:53

Excel sheets can become a piece of art... Looking like professionally designed analytics dashboards!

Excel Pedro Wave Says....

04 julio, 2022 11:58

Ya puedes descargar la actualización con la última carrera del 3 de julio en Gran Bretaña.

Excel Pedro Wave Says....

10 julio, 2022 17:45

Está lista para su descarga la actualización con la carrera del 10 de julio en Austria.

Excel Pedro Wave Says....

24 julio, 2022 17:35

Actualizada la descarga con la carrera del 24 de julio en Francia

Excel Pedro Wave Says....

31 julio, 2022 17:55

Ya puedes descargar la actualización con la última carrera del 31 de julio en Hungría.

Excel Pedro Wave Says....

29 agosto, 2022 09:17

Ya puedes descargar la actualización con la última carrera del 28 de agosto en Bélgica.

Excel Pedro Wave Says....

04 septiembre, 2022 18:25

Ya puedes descargar la actualización con la última carrera del 4 de septiembre en Países Bajos.

Excel Pedro Wave Says....

12 septiembre, 2022 08:59

Ya puedes descargar la actualización con la última carrera del 11 de septiembre en Italia.

Excel Pedro Wave Says....

02 octubre, 2022 23:01

Ya puedes descargar la actualización con la última carrera del 2 de octubre en Singapur.

Excel Pedro Wave Says....

09 octubre, 2022 13:48

Ya puedes descargar la actualización con la última carrera del 9 de octubre en Japón.

Excel Pedro Wave Says....

24 octubre, 2022 09:12

Ya puedes descargar la actualización con la última carrera del 14 de octubre en Estados Unidos.

Excel Pedro Wave Says....

31 octubre, 2022 08:05

Ya puedes descargar la actualización con la última carrera del 30 de octubre en Méjico.

Excel Pedro Wave Says....

14 noviembre, 2022 08:09

Ya puedes descargar la actualización con la última carrera del 13 de noviembre en Brasil.

Excel Pedro Wave Says....

21 noviembre, 2022 13:35

Ya puedes descargar la actualización con la última carrera del 20 de noviembre en Emiratos Árabes Unidos. Este proyecto finaliza con esta actualización.

Dime si te gusta lo que lees y, si no te gusta, dime por qué. Tengo habilitada la moderación de comentarios. Tu comentario se publicará pronto.

#ExcelPedroWave

Traducir el blog