Haplox

Si subes el archivo de ejemplo no tendremos que andar adivinando @mlmoreno

Ya ves @Snake , llega @Silvia y hace que nuestras fórmulas parezcan de jugete

Te dejo la solución @pedritito para encontrar las dos palabras en los 2 textos. No entindo muy bién como lo organizas, pero con la fórmula para encontrarlos podrás combinarlos de la mejor manera que te venga encontrar-palabra.xlsx

Te dejo una solución @sprit36. Mira y comenta Copia de Borrar celdas diferentes-1.xlsm

Otra prueba @Jonacz Dat = Application.WorksheetFunction.VLookup(Sheets(1).Range("B42"), Sheets(2).Range("B3:AK3"), 3, False)

@chinomagic, el foro no deja subir archivos más grandes de 100kB. Prueba a subirlo a un servidor externo (Dropbox, Google Drive, Mega, etc.)

Pues puede ser, o que yo no me entere, que todo es posible. Pero si ni siquiera estás dispuesto a subri los archivo, yo ya no sé qué más adivinar. Hasta aquí he llegado

Hombre @eugeniocol, es que esa no es la duda que has planteado . De la forma que lo describes no te puede funcionar nunca por qué los libros tienen que estar abiertos. Lo que tienes que hacer es crear una conexión entre los libros. En la pestaña datos tienes que crear la conexión entre los libros

no veo fallos en la fórmula @eugeniocol . Lo único que se me ocurre es que la celda C1 no tenga formato de número, para comprobar que es >0. Sin los archivos es difícil adivinar lo que puede pasar

Te dejo una solución @Javiaer. Las fórmulas están en la columna B sustituir_fecha.xlsx

de verdad @jesus miguel , no entiendo nada de este post . ¿Y en eso último que has puesto dónde está la suma que necesitas según el título del post?

@JSDJSD , Pero es que como lo tienes, al menos yo no veo cómo hacerlo para que siempre lo puedas hacer igual . Dependerá de los casos que tengas. Por ejemplo Pedro, para un mismo pago lo has dividido en dos cuadros para que te quepa, pero esto no se puede programar (al menos yo no sé) para que siempre haga lo mismo, por que siempre va a ser distinto en función de los datos que tengas y como acaben distribuidos para que te quepan. Ahora no sé si me explico yo , pero las mcros pueden automatizar, pero no adivinar

¿De verdad @JSDJSD que no hay otraforma de ordenarlo? Llevo un rato dándole vueltas y aun no lo he entendido...

No sé en anteriores,pero si usas excel 2013 @hesi31 , con el botón derecho sobre la celda-->borrar contenido

@Jonacz , prueba con lo siguiente a ver si es el problema Dat = Application.WorksheetFunction.VLookup(Sheets(1).Range("B42"), Sheets(2.)Range("B3:AK3"), 3, False)