Fiz um teste aqui e está executando instantaneamente.

O problema é que vou executar umas 120 vezes em uma rotina, gostaria de saber se existe alguma forma de evitar a viagem até a guia "Planilha1", transportando os dados sem fazer o processo do curso de clicar na guia e nas celular para copiar e colar.

Copia só valores:

Sub macro_copiar()
 Sheets("Planilha1").Range("A:M").Value = Sheets("plan1").Range("A:M").Value
End sub

Copia Tudo:

Sub macro_copiar()
Sheets("Plan1").Range("A:M").Copy Sheets("Planilha1").Range("A1")
End Sub

Option Explicit

Sub copiar()


Dim linha As Long

For linha = 1 To Plan1.UsedRange.Rows.Count

Sheets("Planilha1").Range("A" & linha & ":M" & linha).Value = Sheets("Plan1").Range("A" & linha & ":M" & linha).Value

Next linha


End Sub