End(xlDown) Issue

[Pistolade]

No matter what I do I just cant get it to go to the right position. I
it worked correctly the macro would copy cells A2:O33, copy them
activate sheet "Variables QS", Then select the next open cell in colum
B and paste the earlier selection.

That is it. and I just cant get it to work, I never had this issu
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

 

[L. Howard]

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