James Bond

De entrada esta instrucción esta mal MsgBox "Ingrese datos": Exit Sub, Le estas diciendo a la macro que muestre un mensaje y que inmediatamente de por terminado el programa la instrucción correcta es así MsgBox "Ingrese datos" Y después escribes las...

A tu sumatoria puedes integrar la fórmula de u1 y anclarla (ponerle $) por ejemplo =(4.95/SI($M$14="Hombre",($C$2-$C$3*(LOG(D24+E24+F24+G24))),SI($M$14="Mujer",(($D$2-$D$3*(LOG(D24+E24+F24+G24))))))-4.5)*100 De esta manera te queda así el resultado...

El problema esta en que encontraste la macro que querías sin conocer su funcionamiento te explico, la macro esta nombrada Private Sub Workbook_SheetSelectionChange(ByVal Sh As Object, _ ByVal Target As Excel. Range) Esto quiere decir que la amcro se...

Si tienes una lista grande de nombres te conviene hacerlo por macros, este es un ejemplo del resultado que queda después de usar la macro. y esta es la macro Sub separar() Set datos = Range("a1").CurrentRegion With datos r = .Rows.Count For i = 1 To...

Prueba esta macro, es dinámica solo colocara en aquellas filas que tengan datos, tienes demasiados select eso en una macro no es bueno Sub sumar_datos() Set h1 = Worksheets("hoja1") Set h2 = Worksheets("hoja2") Set datos =...

Este ejemplo fue hecho con 6500 código, como no especificas en que columna están los datos que se quieren sumar la macro hace el calculo usando la columna A(1) y C(3) y coloca los resultados dos columnas después de la ultima columna con datos,...

Tienes que definir primero cuando empieza el horario diurno y cuando termina y luego usar una fórmula como esta =SI(Y(HORA(A1)>7, HORA(A1)<20),"diurno","nocturno")

Ve la imagen

Este es el resultado de la macro para que funcione es necesario que tus datos en la hoja dos estén como en la imagen en A3 capturas la fecha puede se cualquier fecha, Excel calcula el numero de mes y con ese numero la macro totaliza en C3 y esta es...

Por macro te quedaría así y esta es la macro Sub numerar_duplicados() Set datos = Range("b1").CurrentRegion With datos r = .Rows.Count: c = .Columns.Count Set nombres = .Columns(c + 2).Resize(r, 2) With nombres datos.Copy:...