Funcionou amigos com a resposta do Edson.. muito obrigado a todos.

Ok Pessoal, Segue o arquivo com a "macro7" que faz a função que preciso, no entanto limitada à linha da gravação original. TesteForum.xlsm

Tentei, quase deu mas deu Bug... dá uma olhada no anexo.