Copy And Paste Area Aren't Same Size

I'm trying to paste the column that my code found into the blank cell C18, which may change in the future, but I got an error that I need to select the cell to paste the column to - I'm not getting the code right. Here's what I've tried:

For Each Cell In Sheets("Total Sell Dollars").Range("1:1")
If Cell.Value Like "2014*" Then
BlankRow = Sheets("Total Sell Dollars").Range("C" & Rows.Count).End(xlUp)

Cell.EntireColumn.Copy Sheets("Total Sell Dollars").Cells(BlankRow + 1).Select.Paste
Sheets("Total Sell Dollars").Select
End If
Next

When I run this:
Cell.EntireColumn.Copy Sheets("Total Sell Dollars").Cells(BlankRow + 1).Select.Paste
line gets highlighted and it says:
"Run Time error '424': Object Required"

This is the code that I tried when I got the paste error:
Cell.EntireColumn.Copy Sheets("Total Sell Dollars").Cells(BlankRow + 1)

and the error was: Run-time error '1004'
We can't paste because the Copy area and paste area aren't the same size.

Try one of the following:
Click one cell, then paste.
Select a rectangle that's the same size, then paste.

Once I paste the column that excel found, I want to go to the next column and paste the found column into the cell C19 - which may change in the future and so on until all the found columns with 2014 in them are pasted.