Hi J,

My original code:

'<<=====================
Sub Tester04()

With ActiveSheet
.Range("A600:D602").Copy
.Paste (.Cells(Rows.Count, "A").End(xlUp)(2))
End With
End Sub
'=====================

works fine for me.

Did you copy / paste it into your workbook to avoid any transcription
errors?

BTW, the last line of a macro should be:

End Sub (two words)

not

EndSub (one word)

as shown in your Insert_Invoice_Total_Box() sub. although this is probably
a simple typo.

---
Regards,
Norman



"J.Reynolds" wrote in message
...
Norman, I am new to this, it is easy in word but I am having trouble in
excel. So far I have:-
Sub Insert_Invoice_Total_Box()
Range ("A600:D602").Select
Selection.Copy
Range ("?").Select
ActiveSheet.Paste

EndSub

It is what to put for the question mark, it could be anywhere between A16
and A600. Reading other posts in the group J_Gold asked on 28th May "I
would
like to be able to subtotal a column of numbers using the following
formula:"
I havent been able to test that on my spreadsheet, but I dont mind if the
column doesn't subtotal I can do that manually, for now I want to insert
formatting so that I can subtotal, tax, shipping and total etc.
Thanks J.



"Norman Jones" wrote:

Hi J,

I can't reproduce your problem.

Could you copy / paste your Sub's code into a reply?

---
Regards,
Norman



"J.Reynolds" wrote in message
...
Thanks for trying Norman but at End(xlUp)(2)) I get 'compile Error
Expected
expression' and I dont know how to sort it out.


"Norman Jones" wrote:

Hi J,

Assuming that column A is to be used to determine the end of existing
data,
try:

Sub Tester04()

With ActiveSheet
.Range("A600:D602").Copy
.Paste (.Cells(Rows.Count, "A").End(xlUp)(2))
End With
End Sub

---
Regards,
Norman



"J.Reynolds" wrote in message
...
I am trying to insert some cells that I have formatted into a
spreadsheet
at
a point where entries finish. This could be anywhere on the sheet.
So
far I
have managed:- Range("A600:D602").Select
Selection.Copy
Range("..????")Select
Active Sheet Paste.
How can I tell the macro to enter my cells at the cell which I
selected
without stipulating an actual cell?