Para Luis Mondelo

Hola Luis buenas tardes,la semana pasada me enviaste la siguiente macro

Sub acumular()
'por luismondelo
Range("c33").End(xlUp).Offset(1, 0).Select
Range("c33").End(xlUp).Offset(1, 0).Value = Sheets("parte diario").Range("b4").Value
Range("d33").End(xlUp).Offset(1, 0).Value = Sheets("parte diario").Range("b5").Value
Range("e33").End(xlUp).Offset(1, 0).Value = Sheets("parte diario").Range("b6").Value
End Sub

Era para acumular datos de una hoja a otra de un mismo libro la pregunta es ¿se podria modificar para que los tomase de un libro a otro?Gracias

1 respuesta

Respuesta
1

Claro, necesito el nombre del libro origen y el nombre del libro destino

Si libro origen Parte Diario libro destino histórico.

Esta sería la macro que debe estar copiada en el archivo HISTÓRICO para ejecutarse desde él. El archivo PARTE DIARIO debe estar abierto cuando se ejecute la macro.

Sub acumular()
'por luismondelo
Range("c33").End(xlUp).Offset(1, 0).Select
Range("c33").End(xlUp).Offset(1, 0).Value = workbooks("parte diario.xlsx").Sheets("parte diario").Range("b4").Value
Range("d33").End(xlUp).Offset(1, 0).Value = workbooks("parte diario.xlsx").Sheets("parte diario").Range("b5").Value
Range("e33").End(xlUp).Offset(1, 0).Value = workbooks("parte diario.xlsx").Sheets("parte diario").Range("b6").Value
End Sub

Añade tu respuesta

Haz clic para o

Más respuestas relacionadas