Entradas

Mostrando las entradas con la etiqueta Macros excel

Calculadora de pérdida de peso: mi proceso convertido en una herramienta

Imagen
Calculadora de pérdida de peso: mi proceso convertido en una herramienta En este artículo quiero compartir mi propio proceso de pérdida de peso y transformarlo en algo práctico: una calculadora sencilla para perder peso , desarrollada con JavaScript , que cualquiera puede usar desde su navegador. ⚠️ Nota importante: esta calculadora no sustituye la asesoría médica o nutricional. Es una herramienta educativa basada en mi experiencia personal y fórmulas generales. 🎯 Objetivo de la calculadora La idea es que la persona pueda: Ingresar su peso actual Ingresar su peso objetivo Indicar su estatura Indicar su edad Seleccionar su nivel de actividad física Definir un déficit calórico diario Y obtener: Calorías de mantenimiento (TDEE) Calorías recomendadas para perder peso Estimación de semanas para llegar al objetivo 🧮 Fórmulas utilizadas 1. Tasa Metabólica Basal (BMR) Uso la fórmula de Mifflin-St Jeor , una de las más aceptadas: Muje...

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...

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