以下のコードを条件を変えながら実行してみましたが、
画面更新停止させず、再計算も自動が一番早かったです。
画面更新を停止させたり再計算を止めると早くなるとの解説をよくみかけるのですが、
どうしてこの場合は早くならないのでしょうか？

Public Sub ChartUpdate_test()

Dim Data1, Data2
Dim lngtime As Long
Dim i As Long
lngtime = GetTickCount

With ThisWorkbook.Worksheets("Chart")

Data1 = .Cells(3, "U").Resize(100, 10).Value
Data2 = .Cells(3, "AA").Resize(100, 10).Value

For i = 1 To 50
'Application.ScreenUpdating = False
'Application.Calculation = xlCalculationManual
.Cells(3, "U").Resize(100, 10) = Data2
.Cells(3, "AA").Resize(100, 10) = Data1
.Cells(3, "U").Resize(100, 10) = Data1
.Cells(3, "AA").Resize(100, 10) = Data2
'Application.Calculation = xlCalculationAutomatic
'Application.ScreenUpdating = True
Next i
End With

Debug.Print GetTickCount - lngtime

End Sub