Visual Basic Comando para continuar com a verificação

[Andrade Info]

Boa noite! Sou iniciante e gostaria de uma ajuda...

Eu gravei a seguinte macro:

Sub teste()
'
' teste Macro
'

'
    Range(Selection, Selection.End(xlToRight)).Select
    Selection.Copy
    Sheets("212").Select
    Range("A1").Select
    ActiveSheet.Paste
    Sheets("Comb18nº").Select
    Range("T1").Select
    Application.CutCopyMode = False
    ActiveCell.FormulaR1C1 = "='212'!RC[18]"
    Range("T1").Select
    ActiveCell.FormulaR1C1 = "='212'!RC38"
    Range("T1").Select
    Selection.AutoFill Destination:=Range("T1:AL1"), Type:=xlFillDefault
    Range("T1:AL1").Select
    Range("U1").Select
    ActiveCell.FormulaR1C1 = "='212'!R[1]C38"
    Range("V1").Select
    ActiveCell.FormulaR1C1 = "='212'!R[2]C38"
    Range("W1").Select
    ActiveCell.FormulaR1C1 = "='212'!R[3]C38"
    Range("X1").Select
    ActiveCell.FormulaR1C1 = "='212'!R[4]C38"
    Range("Y1").Select
    ActiveCell.FormulaR1C1 = "='212'!R[5]C38"
    Range("Z1").Select
    ActiveCell.FormulaR1C1 = "='212'!R[6]C38"
    Range("AA1").Select
    ActiveCell.FormulaR1C1 = "='212'!R[7]C38"
    Range("AB1").Select
    ActiveCell.FormulaR1C1 = "='212'!R[8]C38"
    Range("AC1").Select
    ActiveCell.FormulaR1C1 = "='212'!R[9]C38"
    Range("AD1").Select
    ActiveCell.FormulaR1C1 = "='212'!R[10]C38"
    Range("AE1").Select
    ActiveCell.FormulaR1C1 = "='212'!R[11]C38"
    Range("AF1").Select
    ActiveCell.FormulaR1C1 = "='212'!R[12]C38"
    Range("AG1").Select
    ActiveCell.FormulaR1C1 = "='212'!R[13]C38"
    Range("AH1").Select
    ActiveCell.FormulaR1C1 = "='212'!R[13]C38"
    Range("AI1").Select
    ActiveCell.FormulaR1C1 = "='212'!R[14]C38"
    Range("AJ1").Select
    ActiveCell.FormulaR1C1 = "='212'!R[15]C38"
    Range("AK1").Select
    ActiveCell.FormulaR1C1 = "='212'!R[16]C38"
    Range("AL1").Select
    ActiveCell.FormulaR1C1 = "='212'!R[17]C38"
    Range("AM1").Select
End Sub

 

Qual comando eu uso dentro dessa macro para ele continuar verificando as demais linhas?

Vamos lá, eu copiei "A1:R1" de uma planilha e colei em outra planilha, com isso ele jerou uns resultados e retornou 

para a planilha de onde copiei.

Agora, eu queria que isso continuasse automaticamente para "A2:R2", "A3:R3" em diante, ou seja, quando eu apertar

o botão que criei para a macro ele vá automáticamente até a ultima linha que é "A480700:R480700".