Macro que a través de un bucle me sume una macro

Hola MI PREGUNTA ES OJALA ME ENTIENDAN TENGO DOS LIBROS LIBRO1 Y LIBRO2 y necesito hacer un bucle con los datos del libro 2 que al presionar suma este botón mande el 3 y 8 al libro 1 los sume en total y me mande la suma al libro 2 y así con el 4 y 5 hasta el 6 y 5 si me podrían ayudar por favor

1 Respuesta

Respuesta
1

Te anexo la macro para 2 libros

Los datos deberán estar así como tienes la imagen, los datos en el libro2 y las sumas se van a hacer en el libro1.

Los dos libros deberás tenerlos abiertos.

Pon tu botón en el libro2, pero también pon la macro en el libro2.

Sub pasar()
'Por.Dante Amor
Set l1 = Workbooks("libro1")
Set h1 = l1.Sheets("Hoja1")
Set l2 = Workbooks("libro2")
Set h2 = l2.Sheets("Hoja1")
    For i = 12 To 15
        h2.Range(h2.Cells(i, "H"), h2.Cells(i, "I")).Copy h1.Range("B9")
        h1.Range("D9") = "=sum(B9:C9)"
        h1.Range("D9").Copy h2.Cells(i, "J")
    Next
End Sub

Saludos.Dante Amor

No olvides valorar la respuesta.

.

Añade tu respuesta

Haz clic para o

Más respuestas relacionadas