Erreur 1004

Bonjour,
Je suis débutant VBA, j'ai développé cette macro pour recopier des cellules de deux feuilles excel sources vers une feuille cible et il s'afficher une erreur 1004!!

Macro:
Sub Macro1()
'
' Macro1 Macro
'

' Recopie des colonnes de T1, T2
Set T1 = ActiveWorkbook.Worksheets("T1")
Set T2 = Worksheets("T2")
Set T3 = Worksheets("T3")

Dim i As Integer, j As Integer

i = 0
Do While T1.Cells(1, i).Value <> ""
i = i + 1
T3.Cells(1, i) = T1.Cells(1, i).Value
Max_i = i
Loop

j = 0
Do While T2.Cells(1, i) <> ""
j = j + 1
T3.Cells(1, Maax_i + 1 + j) = T2.Cells(1, j).Value
Loop



End Sub