Hi

I'm getting a debug error 1004 for this simpel code:
Error occurs in the Sheets line. I keep thinking theres one simpel
thing that I am missing, can anyone point me in the right direction?

Private Sub button2_Click()


Range("B18").Select
Range(Selection, Selection.End(xlToRight)).Select
Range(Selection, Selection.End(xlDown)).Select
Selection.Copy
Sheets("Original").Range("A9").Select
ActiveSheet.Paste

'Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone,
SkipBlanks _
':=False, Transpose:=False
Application.CutCopyMode = False

End Sub