Entradas

Mostrando las entradas con la etiqueta VBA para macer macro de Excel

¿Cuál es el Pokémon más pesado? Análisis con Python y PokeAPI

Imagen
¿Alguna vez te has preguntado cuál es el Pokémon más pesado, cuál pesa menos o cuál es el Pokémon más pequeño? En este proyecto vamos a responder algunas de estas preguntas utilizando Python, Jupyter Notebook, Pandas y PokeAPI . La idea es utilizar los datos disponibles en una API para realizar un pequeño análisis de datos y posteriormente convertir algunos de los resultados en contenido para YouTube Shorts. ¿Qué es PokeAPI? PokeAPI es una API pública que proporciona información sobre Pokémon. Podemos consultar datos como: Nombre del Pokémon ID de la Pokédex Peso Altura Tipos Habilidades Estadísticas Imágenes Movimientos Experiencia base Para este análisis utilizamos el endpoint de Pokémon de PokeAPI. ¿Cuántos Pokémon podemos consultar? Primero podemos consultar cuántos registros están disponibles actualmente en la API. import requests url = "https://pokeapi.co/api/v2/pokemon/?limit=1" response = requests.get(url) data = response.json() ...
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í!