Boa tarde jau288,

Uma coisa que não ficou clara para mim, é se você quer os novos dados em baixo da sequência anterior ou em cima.

Se você quer colocar os dados em baixo da sequência anterior, esse código resolve:

Sub CopiarDadosGerados()
    
    Dim Ulinha As Double: Ulinha = Range("T1048576").End(xlUp).Offset(1, 0).Row
    
    Range("B3").CurrentRegion.Copy Range("T" & Ulinha)
        
End Sub

Boa-tarde

Dá uma olhada nessa planilha e adapta ao que você precisa.

Att,

Francisco

Muito obrigado pela ajuda, justamente isso que precisava...

Saudações a todos...