End(xlDown) Issue
On Monday, April 14, 2014 2:35:43 PM UTC-7, Pistolade wrote:
No matter what I do I just cant get it to go to the right position. If
it worked correctly the macro would copy cells A2:O33, copy them,
activate sheet "Variables QS", Then select the next open cell in column
B and paste the earlier selection.
That is it. and I just cant get it to work, I never had this issue
before.
Heres the code im using:
Code:
--------------------
Sub SavingTable()
'
' SavingTable Macro
'
'
Range("A2:O33").Select
Selection.Copy
Sheets("Variables QS").Select
Range("B1").End(xlDown).Offset(-1,0).Select
ActiveSheet.Paste
Sheets("Variables").Select
Range("G1").Select
Selection.Copy
Sheets("VariablesQS").Select
Range("A1").End(xlDown).Offset(-1,0).Select
ActiveSheet.Paste
End Sub
Pistolade
Try to work this into your code, no need to select.
Range("A2:O33").Copy Sheets("Variables QS").Range("B" & Rows.Count).End(xlUp)(2)
Regards,
Howard
|