Entradas

Mostrando las entradas con la etiqueta Macro en Excel Eliminar filas en Excel Automatización en Excel

🏎️ GP de Austria 2026: ¿Quién ganó, quién remontó y quién abandonó?

Imagen
Gran Premio de Austria 2026: análisis de posiciones, remontadas y abandonos con Python El Gran Premio de Austria 2026 nos dejó una carrera con cambios importantes de posiciones, remontadas y cuatro abandonos. En este análisis utilizamos Python y datos obtenidos mediante una API de Fórmula 1 para estudiar qué pilotos ganaron posiciones, quién perdió más lugares desde la largada y qué pilotos no pudieron completar la carrera. Este análisis forma parte de nuestra serie de Sport Analytics de Fórmula 1 , donde utilizamos datos para descubrir historias interesantes dentro de las carreras. 📡 Fuente de datos: API de Fórmula 1 Para obtener los datos utilizamos la API de Fórmula 1 disponible a través de RapidAPI . La API utilizada fue: api-formula-1.p.rapidapi.com Primero consultamos las carreras de la temporada 2026 mediante el endpoint: /races?season=2026 A partir de esta consulta identificamos el Gran Premio de Austria 2026 . El identificador de la carrera f...
Publicar un comentario
Leer más

Macro en Excel para remover filas duplicadas.VBA programación para todos.

Imagen
 En ocasiones necesitamos remover datos duplicados en nuestros datos de salida de alguna hoja de Excel. En esta ocasión les comparto una función en VBA para poder hacerlo. En mi caso tengo una Macro que válida datos y va escribiendo el análisis en la hoja4 y necesito que remueva resultados duplicados para ello utilizo la siguiente función . En esta macro la pueden ajustar para que no sea la hoja4 y sea otra celda para eliminar duplicados. Sub EliminarDuplicadosColumna()     ' Especifica la hoja donde quieres trabajar     Dim ws As Worksheet     Set ws = ThisWorkbook.Sheets( "Hoja4" )     ' Encuentra la última fila con datos en la columna Q de la hoja especificada     Dim LastRow As Long 'columna q la cual puedes cambiar por cualquier otra     LastRow = ws.Cells(ws.Rows.Count, "Q" ).End(xlUp).Row     ' Define el rango a evaluar en la hoja especificada     Dim rng As Range     Set rng = ws.Range...
Publicar un comentario
Leer más

🚀 Mantener este blog funcionando requiere tiempo y café. ¡Puedes contribuir con uno aquí!