Copy cells into a new sheet

[webbie]

Hi all

I have a sheet where you can enter info into cells C5, C7, C9, C11, C13, C15 & C17. I need a macro that can copy this info into a new sheet in cells A1, A2, A3, A4, A5, A6, A7. But the next time you press the macro button it needs to find next available line and add the information into the same 7 colums. So next B1, B2, B3, B4, B5, B6, B7 then C1, C2, C3, C4, C5, C6, C7 and so on.

So it should not delete any info on the first sheet as I need this data for other things before it is deleted.

Thanks in advance

Here is a example of the file

Q database 1 exam.xlsm

[Sbarro79]

Try this:

Please Login or Register  to view this content.

[webbie]

Hi Sbarro79

That works just as I asked for.

Two more questions.

1. What part of the code would I need to change to move the data to A1, B1, C1, D1, E1, F1, G1 instead of A1, A2, A3, A4, A5, A6, A7?

2. Is it possible to send data to two sheets at the same time? I can of course make two buttons but would like to combine this.

Thanks

[Sbarro79]

Ad. 1. Try this:

Please Login or Register  to view this content.

Ad. 2. Yes, it's possible. The question is you want to send data to two new sheets, or already existing sheets.

[webbie]

This works just fine. Once again thanks. And regarding nr 2 it is to 2 existing sheets.

[Sbarro79]

Ad. 2. Try this

Please Login or Register  to view this content.

[webbie]

It did copy the values into the wrong cells on the two sheets, but I got it to work with the following:

Please Login or Register  to view this content.

Thanks for your help