Não sugiro atribuir uma ação como essas a um evento de clique de mouse. Ao invés disso, atribua à macro a uma tecla de atalho. A minha
combinação favorita é Ctrl+q.
A macro que você pode criar seria:
Sub PasteRow()
Selection.EntireRow.Rows(1).Copy
Rows(8).PasteSpecial xlPasteValues
End Sub
http://www.ambienteoffice.com.br - http://www.clarian.com.br