¿Macro para sumar celdas que tengan la misma fecha de pago?

Hola Experto

Espero me puedan ayudar necesito una macro que me ayude a poner una suma de algunas facturas pagadas al nivel de la ultima fila pagada ... Sabiendo que más abajo habrá más facturas por pagar y que se pagaran más delante ... Osea que esa suma se ponga cuando pague

No. Fact Monto pag Status Fecha de pago

4483 1296.3 PAGADAS 04/04/2014
4571 1816.66 PAGADAS 04/04/2014
4572 428.04 PAGADAS 04/04/2014
4610 834.04 PAGADAS 04/04/2014
4672 1573.66 PAGADAS 04/04/2014
4673 1421.44 PAGADAS 04/04/2014
4674 1807.28 PAGADAS 04/04/2014
4675 979.62 PAGADAS 04/04/2014 10157.04 <------

1 respuesta

Respuesta
1

En principio no parece necesario utilizar VBA. Prueba poniendo la siguiente fórmula en E2, y copiándola y pegándola hacia abajo hasta donde haya datos:

=SI(Y(C3<>"PAGADAS";C3<>"");SUMA($B$2:B2);"")

Gracias por contestar tan pronto.

Mira no precisamente,

Así como ese ejemplo hay más pagos abajo de ese y lo diferencian las fechas en el día en que se pagaron.

Lo que quisiera es que la suma de los totales de las facturas se haga por la fecha del día que se paga y no por el texto "PAGADAS". Y que además la suma quede en la ultima fila de las facturas pagadas en la misma fecha.

Espero me haya explicado... Muchas gracias

Con el ejemplo que pusiste me resulta difícil hacer pruebas, dado que todas las facturas tienen la misma fecha.
He preparado un pequeño ejemplo con varias fechas, y suponiendo que los datos están en el rango A2:D10 la siguiente fórmula parece que hace lo que (según entiendo) necesitas:

=SI(Y(FILA(D2)=MAX(SI($D$2:$D$10=D2;FILA($D$2:$D$10)));D2<=HOY());SUMA(($D$2:$D$10=D2)*$B$2:$B$10);"")

(Sigo, que se cortó el mensaje)

La fórmula sería para la fila 2 de cualquier columna vacía. Se trata de una fórmula matricial, por lo que hay que introducirla pulsando mayúsculas control entrada al mismo tiempo.
Entiendo que lo que determina si una factura está o no pagada es su fecha de pago, es decir, que si la fecha de pago es la fecha de hoy o una fecha anterior se entiende que está pagada.
De todas formas he subido el ejemplo con el que he estado trabajando a http://www.jrgc.es/ejemplos/ejemplo_20141008a.xlsx Las fórmulas están en E2:E10

Hola Gracias

Veo tu ejemplo pero no entiendo lo de introducir la fórmula. :(

Sólo hay que copiarla en la barra de fórmulas y pulsar mayúsculas + control, y sin soltarlas la tecla de entrada. Si se hace bien, la fórmula aparece encerrada entre llaves { } en la barra de fórmulas, lo que indica que es matricial.

Añade tu respuesta

Haz clic para o

Más respuestas relacionadas