Trying to copy and paste macro that reads paste location from a cell.

Let me explain. I am copying a list from Sheet Models. I need to paste it in Sheet Past.
However, each month will go to the next column. I have a formula that reads what column that will be on the page. It basically looks for the next empty cell in a certain row.

I have a script started but i won't work. I don't know how to get the paste to acknowledge the value from the cell.

This is the script i have...(targetCell.select is where it breaks down.

Sub Macro2()
'
' Macro2 Macro
'
Sheets("PAST").Select
Range("C1").Select
Sheets("MODELS").Select
Range("D6:D489").Select
Selection.Copy
Sheets("PAST").Select
Dim cellValue As Range
cellAddress = "C1"
Set targetCell = Range(cellAddress)
targetCell.Select
Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks
:=False, Transpose:=False
End Sub

I not very good at this so please speak slowly.
If you have an easier method please let me know

The value in C1 has the location. As the location changes so does the value in C1. This is the reason I was doing it this way.
In the above script would the macro just paste the contents into C1?

Sub Macro1()

Dim sourceRange As Range
Dim destinationRange As Range
Sheets("models").Select
Set sourceRange = Range("i1:i66")
Sheets("past").Select
Set destinationRange = Range(Range("C1").Value)
sourceRange.Copy
destinationRange.PasteSpecial Paste:=xlPasteValuesAndNumberFormats
Application.CutCopyMode = False
End Sub

Found the answer, thanks to those who helped