jrgces

Suponiendo que la hoja se llama Hoja1: Sub prueba() Dim r As Range Set r = Range("Hoja1!" & Left(Mid([Hoja1!a1].Formula, 6), Len(Mid([Hoja1!a1].Formula, 6)) - 1)) [Hoja1!a1].Formula = "=sum(" & r.Resize(r.Rows.Count + 1, 1).Address & ")" End Sub

Esta es una de las cosas que pueden parecer sencillas de hacer en Excel pero que, hasta donde yo sé, resultan complicadísimas si se quieren conseguir mediante una sola fórmula. Prueba con la siguiente fórmula en B1:...

=sumaproducto((B60:AZ60="Gipuzkoa")*(B16:AZ16="Sí"))

Yo escribí una función que hace más o menos eso, mira si te sirve: http://www.jrgc.es/ejemplos/EncontrarSumandos.xls

Prueba con la siguiente fórmula, que hay que poner en C2 y luego copiar y pegar hasta C7: =SUMA(--(FRECUENCIA(SI((B$2:B$7=B2)*(A$2:A$7<=A2)=1;A$2:A$7);SI((B$2:B$7=B2)*(A$2:A$7<=A2)=1;A$2:A$7))>0)) Teniendo en cuenta que: - Se trata de una fórmula...

Value es la propiedad por defecto (es la mejor traducción que encuentro para "default property") del objeto Range, así que si no se hace referencia a una propiedad o método de forma explícita al usar un objeto Range VBA "entiende por su cuenta" que...

Sin ver los datos es difícil escribir la fórmula, pero prueba con: =SI(V49="NO";SUMAPRODUCTO((AP3:AP44=A65)*(AC3:AC44>--("8:00")));SUMAPRODUCTO((AP3:AP44=A10)*(AC3:AC44 <>0)))

Por ejemplo, si 1:40 están en A1 la fórmula podría ser: =REDONDEAR.MAS(A1*1440;0) En la que quizás haya que sustituir el punto y coma por una coma, dependerá del separador de listas del equipo.

Por ejemplo, si los datos están en A1:B6 y el cuadro resumen va en D1:H4, la fórmula en E2 sería: =SUMAPRODUCTO(--($A$2:$A$6&$B$2:$B$6=$D2&E$1)) Esta fórmula habría que copiarla y pegarla en E3 y luego copiar E2:E3 y pegarlo en F2:G3.

Prueba con algo como: =indice({0,215;0,185;0,14};coincidir(55000;{120000,2;53407,21;33007,21};-1))