Bom dia,

Pessoal, preciso de uma ajuda !

Eu tenho um formulário em uma planilha, e gostaria de criar uma macro que incluísse esse formulário na última linha vazia.

No caso, esse formulário está em 3:65
Preciso que na linha 66, ele copie o que está nessa área (3:65) e cole.
A macro que eu tinha era:

Sub lsInsereRegistros()

    Dim lUltimaLinhaAtiva As Long

    lUltimaLinhaAtiva = Worksheets("Registros").Cells(Worksheets("Registros").Rows.Count, 1).End(xlUp).Row + 1

    Rows("X:X").Select
    Range("X").Activate
    Selection.EntireRow.Hidden = False
    Rows("X").Select
    Selection.Copy
    Rows(lUltimaLinhaAtiva & ":" & lUltimaLinhaAtiva).Select
    ActiveSheet.Paste
    End Sub

Mas não estou conseguindo ajustar para a minha necessidade.
Muitíssimo obrigado !!!