Help creating a Variant in VBA

I need some help in Copying a range of cells from sheet ?Tithes? to the next Empty Row on sheet ?Income?. After reading a lot, I got the paste part to work. Because the monthly entry?s count is dynamic I created a VLookup table and used the MAX function to create a referent cell which equal ?W3:AC18? on sheet ?Tithes? cell ?O9?. Any help would be greatly appreciated.

Option Explicit
Dim CopyCell As Variant

Sub SUBMIT2()

Dim CopyCell As Variant

Set CopyCell = Worksheets("Tithes").Range("O9")

Worksheets("Tithes").Range("CopyCell").Copy
Worksheets("Income").Range("C2").End(xlDown).Offset(1).PasteSpecial xlValues
Application.CutCopyMode = False

End Sub

Thank for your help!
It still stop on the below line of code:

Worksheets("Tithes").Range(CopyCell).Copy

Below is my manual input of Array of (W3:AC18) in to the code and it works:


Sub SUBMIT2()

Dim copySheet As Worksheet
Dim pasteSheet As Worksheet
Dim CopyRange As Worksheet

Set copySheet = Worksheets("Tithes")
Set pasteSheet = Worksheets("Income")

copySheet.Range("W3:AC18").Copy
pasteSheet.Range("C2").End(xlDown).Offset(1).PasteSpecial xlValues
Application.CutCopyMode = False

End Sub

So removing the useless like this VBA demonstration :

PHP Code: 

Sub Demo1()
    [Income!C2].End(xlDown)(2).Resize(16, 7) = [Tithes!W3:AC18].Value
End Sub 


► Do you like it ? ► ► So thanks to click on bottom left star icon « ★ Add Reputation » ! ◄ ◄

My previous post beginner level VBA demonstration revamped according to the useless cell O9 :

PHP Code: 

Sub Demo1r()
    With Sheets("Tithes").Range([Tithes!O9])
        [Income!C2].End(xlDown)(2).Resize(.Rows.Count, .Columns.Count) = .Value
    End With
End Sub 


► Do you like it ? ► ► So thanks to click on bottom left star icon « ★ Add Reputation » ! ◄ ◄

Thanks Marc, not sure what to with you line of code. I don't know if you know that the Sheet "Tithes" cell "O9" stores an array that's dynamic. Which adjust the array size base on the MAX value of a VLookup table.

First let me apologize to everyone, that help me on my issue with my spreadsheet. There was a typo on my initial post. The cell referent on the Sheet “Tithes was Q9 not O9.
The first responds I got worked perfectly, once I made the correction.
I had been working on this project for too long.
Thank you all for your help!!
Charles