Copying records from a sheet to a list

[amilcoy]

Hope someone can point me in the right direction here ..

I have a worksheet which is essentially a data collection worksheet and is linked to a number of output sheets which compare the data entered to certain peer information which in turn produce a series of charts and reports .

What I am looking to do is: after completing the report for the current data entry I would like to copy the contents of the data entry sheet into a separate sheet as a transaction in a list.

How can I take the contents of the existing data entry sheet (called Input) and paste the various cell values to the transaction sheet (called Transactions )

The layout of the data entry sheet is such that it uses various merged cells and the like to make data entry easier for the user, however this procludes the use of (or so it seems) range names or sequential data ranges as a number of the cells contain 'help' as to what should be entered into a specific cell/range of cells and I do not want to copy these into the transaction table.

Hopefully, the above makes some sense and someone will be able to at least give me a starter.

As always, any help is gratefully receieved

Regards

Andy

 

[fairwinds]

Welcome!

Without knowin you layout it is hard to help.

I think a good advice to get you started is for you to record a macro when you copy and paste the values into the new sheet. The code you get can then be altered to do what want.

 

[BrianB]

To find the last row of data use something like :-
ToRow = ToSheet.Range("A65536").End(xlUp).Row + 1

Then you can do something like :-
WorkSheets("Transactions").Cells(ToRow,1).Value =WorkSheets("Input").Range("A1").Value