Christian Ricken de Souza

Boa tarde Tenho uma planilha onde tenho uma base aonde eu alimento manualmente e uma aba de registro, gostaria de criar uma macro aonde eu conseguiria Recortar as informações da Base e colar no registro porém não estou conseguindo. Obs: Gostaria de recortar a coluna A e L e colar em registros na coluna A e B na ultima linha em branco https://www.sendspace.com/file/90tgl5 Tentei o código abaixo porém não copia as duas colunas e também não apaga "Sub TESTE() Dim LR As Long 'retorna o número da última linha com conteúdo na coluna LR = Sheets("registro").Cells(Rows.Count, 1).End(xlUp).Row Sheets("Controle_Trat_Filial").Range("A5:A99").Copy Sheets("registro").Range("A" & LR + 1) End Sub"