Excel file works on 2010 and throws an error on excel 2013

I have an excel file that works perfectly fine on excel 2010 but on using excel 2013 it throws and error runtime error 1004 application defined or object defined

Sub CreateList()

Dim rngData As Range
Dim dst As Range
Dim src As Range
Dim wkbNew As Workbook

Dim i As Long

shtList.Cells.ClearContents

Set rngData = ActiveSheet.Range("rngData")

ActiveSheet.Range("rngHeader").Copy

shtList.Range("A1").PasteSpecial xlPasteValues
shtList.Cells(1, 1).EntireRow.Font.Bold = True

Set src = ActiveSheet.Range("rngCol")

For i = 1 To src.End(xlDown).Row - 1

ActiveSheet.Range("inpCI").Value = src.Offset(i, 0)
ActiveSheet.Range("inpTask").Value = src.Offset(i, 1)
rngData.Calculate

Set dst = shtList.Cells(shtList.UsedRange.Rows.Count, 1).Offset(1, 0)
rngData.Copy
dst.PasteSpecial xlPasteValues

Next i

Application.CutCopyMode = False

SaveFile

End Sub