Paste clipboard into new free row

[Legacy 229392]

Hello

I'm trying to work out how i can copy cells i have copied into the next free row on say Sheet3

So i can keep on pasting and will end up with what i have copied multiple times

Any help appreciated

Thanks

 

[VoG]

Something like

Sheets("Sheet3").Range("A" & Rows.Count).End(xlUp).Offset(1).PasteSpecial Paste:=xlPasteAll

 

[Legacy 229392]

Something like

Sheets("Sheet3").Range("A" & Rows.Count).End(xlUp).Offset(1).PasteSpecial Paste:=xlPasteAll

with that i get runtime 1004, pastespecial method od range class failed

I have attached the sheet im currently using, sheet 1 is the template, sheet 2 is the data it uses for the vlookup on a1, b1, c1, g1

pretty simple

i have 2 macros on buttons to increase a1 and then one to copy all the data

i want to be able to paste this into sheet 3 really over and over automatically if possible until it runs out of data

http://wehaveany.com/excel/EXCEL%20FORUM2.xlsx

 

[VoG]

That "link" doesn't go anywhere. Please just post your code like this

[code]
code goes here
[/code]

 

[Legacy 229392]

the link is the file hosted on my server, i've just confirmed its working: Link Removed by Admin

it turns out i have just deleted the macros by mistake, arghhhh

i did have one just to increase a1 and another to copy a1:q26