Sumar hasta, pero con condiciones

[mingole]

Muy buenas a todos:

Tengo un problemilla que no se como resolver, por esto acudo al foro a ver si el comité de sabios me echa una manita, jeje

Partiendo de una columna de datos como la de abajo...

Para poder visualizar el resto de este tema y sus adjuntos:
. Si nunca te has registrado puedes registrarte gratis aquí
. Si ya te has registrado debes iniciar sesión aquí

 

[ioyama]

Hola mingole

Revisa el adjunto. He usado matriciales (control + mayúsculas + intro) para introducir la función.

Prueba a variar el valor buscado y tú dirás si te vale o no (o cambia la tabla de...

Para poder visualizar el resto de este tema y sus adjuntos:
. Si nunca te has registrado puedes registrarte gratis aquí
. Si ya te has registrado debes iniciar sesión aquí

 

[mingole]

Wao! que rapidez!

Muchas Gracias ioyama, voy a bajarlo y lo testeo. En cuanto sepa algo, te respondo a ver que tal va.

Un saludo desde Las Palmas

 

[mingole]

Hola de nuevo ioyama:

Lo que me has pasado, está perfecto para encontrar un valor más próximo a uno dado. Lo que yo necesito es algo más complejo.

En mi caso puedo necesitar sumar varios valores...

Para poder visualizar el resto de este tema y sus adjuntos:
. Si nunca te has registrado puedes registrarte gratis aquí
. Si ya te has registrado debes iniciar sesión aquí

 

[galileogali]

En principio, si no me estoy equivocando en la apreciacion habria 2^22 sumas psoibles a revisar y despues cotejar el supremo del conjunto (es decir el Minimo de las sumas mayores o iguales que)...

Para poder visualizar el resto de este tema y sus adjuntos:
. Si nunca te has registrado puedes registrarte gratis aquí
. Si ya te has registrado debes iniciar sesión aquí

 

[mingole]

Parece que es más complicado de lo que pensaba. No doy con la manera de programarlo para que cubra todas las posibilidades. Lo que has dicho galileogali, me parece muy acertado, pero nunca me he...

Para poder visualizar el resto de este tema y sus adjuntos:
. Si nunca te has registrado puedes registrarte gratis aquí
. Si ya te has registrado debes iniciar sesión aquí

 

[jbf99]

En tu premisa planteas que los valores han de ser correlativos . Por correlativos entiendo que deben ser valores que aparcen de manera consecutiva , es decir juntos segun la lista de valores...

Para poder visualizar el resto de este tema y sus adjuntos:
. Si nunca te has registrado puedes registrarte gratis aquí
. Si ya te has registrado debes iniciar sesión aquí

 

[jbf99]

Fe de erratas : Cambiar $B$1 por $A$1

Un saludo

 

[jbf99]

No lleva control de errores y tampoco la he testado mucho , pruebala y me comentas.

Un saludo

Sub probando()
Dim a(22), b(300)
Valorreferencia = Val(InputBox("Introducir el valor de...

Para poder visualizar el resto de este tema y sus adjuntos:
. Si nunca te has registrado puedes registrarte gratis aquí
. Si ya te has registrado debes iniciar sesión aquí

 

[galileogali]

jbf99 : Excelente!!!
(habria que cambiar el > por >= y encontrada la suma devolver los sumandos que cumplen, que bien pueden ser varios grupettos.
Realmente un manejo de indices sorprendente.

 

[mingole]

:shock: :shock: :shock:

Bueno, bueno, bueno, me he quedado flipando viendo tus aportes "jbf99"...

Veo que me queda muchisimo por aprender aun. Como dice Galileogali, excelente.

Sin embargo...

Para poder visualizar el resto de este tema y sus adjuntos:
. Si nunca te has registrado puedes registrarte gratis aquí
. Si ya te has registrado debes iniciar sesión aquí

 

[jbf99]

Si , tiene un +1 de mas , sustituyela por:
=SUMA(INDICE($A:$A;FILA()-COLUMNA()+1;1):INDICE($A:$A;FILA()-COLUMNA()+COLUMNA();1))
Y como bien comenta Gali en la obtencion del minimo cambiar el > por...

Para poder visualizar el resto de este tema y sus adjuntos:
. Si nunca te has registrado puedes registrarte gratis aquí
. Si ya te has registrado debes iniciar sesión aquí

 

[mingole]

Ahora está perfecto. Un trabajo admirable.
Intentaré hacer en macro, lo que hiciste con formulas de localizar los sumandos en la columna original de datos.

Un fuerte abrazo, me has sido de mucha...

Para poder visualizar el resto de este tema y sus adjuntos:
. Si nunca te has registrado puedes registrarte gratis aquí
. Si ya te has registrado debes iniciar sesión aquí

 

[jbf99]

Es un poco chapucera , pero parece que funciona esta macro para el valor que buscas , pruebala y me comentas .

Un saludo

 

[galileogali]

Bueno aca viene la forma en que decia con MMULT....

Option Base 1

Sub buscarSumaSupremo()
Dim vValSuma As Variant 'Variant/Double para almacenar los Valores de MMULT
Dim strBase As String...

Para poder visualizar el resto de este tema y sus adjuntos:
. Si nunca te has registrado puedes registrarte gratis aquí
. Si ya te has registrado debes iniciar sesión aquí

 

[galileogali]

Ahi va de nuevo con algunas correccciones (boton Buscar mala asociado a Macro y agregue Formatos condcionales)

 

[galileogali]

Mientras me duchaba se me ocurrio que tal vez con una simpple Formula matrcial, pudiera en una sola celda, devolver el valor buscado, y bueno ahi esta tal como la encuentran en la celda I9
Falta...

Para poder visualizar el resto de este tema y sus adjuntos:
. Si nunca te has registrado puedes registrarte gratis aquí
. Si ya te has registrado debes iniciar sesión aquí

 

[galileogali]

Ahi va con Macros y con Formula: para valor suma y sumandos que lo componen

 

[mingole]

Muy buenas:

Este fin de semana no he podido probar las macros y soluciones habeis propuesto. Acabo de bajarme los dos y menuda lección me habeis dado.

Solo puedo dar un millón de gracias a ambos...

Para poder visualizar el resto de este tema y sus adjuntos:
. Si nunca te has registrado puedes registrarte gratis aquí
. Si ya te has registrado debes iniciar sesión aquí

 

[galileogali]

Nuevo retoque a la formula para calcular los sumandos, la que esta en M9,
=MIN(MAX(SI(SUBTOTALES(9;DESREF(A1:A22;K9-1;0;FILA(A1:A22);1))=I9;FILA(A1:A22);0));22-K9+1)