Lo que pretendo es que al darle al boton guardar, me pase los datos de esta hoja

a la hoja ACUMULADO respetando las lineas en blanco y asi sucesibamente cada vez que pulse el boton guardar.

Tal y como lo tengo me lo pasa, pero cuando le doy otra vez me machaca parte de lo

que habia anterior mente.

PRUEBA.xls

Tema solucionado con la siguente macro

Sub Traslado()

Range("A1:E23").Select 'seleccionar rango de los datos

Selection.Copy 'copiar el rango de los datos

Sheets("ACUMULADO").Select ' seleccionar la hoja donde pegar los datos

Range("A3000").Select ' ir a la celda A3000

Selection.End(xlUp).Select 'subir hasta la ultima celda con datos

ActiveCell.Offset(5, 0).Select ' bajar una celda

ActiveSheet.Paste 'pegar los datos

Application.CutCopyMode = False

Sheets("HOJILLAS").Select 'seleccionar la hoja 1

Range("A1:E23").Select 'seleccionar rango de los datos

Selection.ClearContents 'borrar la seleccion

Range("a1").Select 'posicionarse en la celda A1

MsgBox "Traslado finalizada, puede volver a ingresar datos" ' lanzar mensaje de que se ha finalizado

End Sub