Maybe this page will help you
http://www.rondebruin.nl/copy1.htm
--
Regards Ron de Bruin
http://www.rondebruin.nl/tips.htm
"stockton12" <(E-Mail Removed)> wrote in message news:BEDAA665-B9CF-4FEE-964B-(E-Mail Removed)...
> Yes, i am looking to append records to the end.
>
> Sub Button4_Click()
>
> With Worksheets("template")
> .Range("G15").Copy
> Worksheets("Payment").Range("a1").PasteSpecial
> End With
>
>
> Worksheets("Template").Range("Q19").ClearContents
> Worksheets("Template").Range("P38:Q49").ClearContents
> Worksheets("Template").Range("G15:J15").ClearContents
>
>
> "Jim Thomlinson" wrote:
>
>> Post your code... Also are you looking to basically append records to the end
>> of your history list or ???
>> --
>> HTH...
>>
>> Jim Thomlinson
>>
>>
>> "stockton12" wrote:
>>
>> > I have a spreadsheet that is used to process invoices. It is a standard
>> > template that has drop down features that I do not want to change. I have
>> > been asked to create a history of all the payments that have been processed
>> > on this spreadsheet. I have found a code to copy the information that I
>> > need, however, I need one that will look and see if the row is not null, then
>> > it will go to the next row.
>> >
>> > Any suggestions?