robertonl,
Boa Noite!
Com uma pequena alteração (conforme código abaixo) você pode abrir o arquivo, fazer a cópia dos dados que você quer, salvar o arquivo que receber os dados e fechar novamente. Isso tudo o código faz de forma automática e totalmente transparente para o usuário final. Ou seja, nem é percebido que o arquivo foi aberto, copiado, salvo e fechado.
Note que o caminho que coloquei para abrir o arquivo foi o ActiveWorkbook.Path. Isso significa que os dois arquivos devem está na mesma pasta. Todavia, isso não é um problema. Se o arquivo que vai receber os dados não puder ficar na mesma pasta que o arquivo .xlsm, altere o caminho no código de maneira a refletir o caminho completo aonde o mesmo se encontra.
Use esse código (seu próprio código com pequenas alterações):
Sub Exportar_Dados()
    '
    ' Exportar_Dados Macro
    '
    Application.ScreenUpdating = False
    Workbooks.Open (ActiveWorkbook.Path & "Relatorio Recebimento.xlsx")
    Windows("Relatorio Recebimento.xlsx").Activate
    ActiveSheet.Unprotect
    Range("A3").Select
    Range(Selection, Selection.End(xlDown)).Select
    Range(Selection, Selection.End(xlToRight)).Select
    Selection.ClearContents
    Windows("Relatorio_Recebe.xlsm").Activate
    Range("A4").Select
    Range(Selection, Selection.End(xlDown)).Select
    Range(Selection, Selection.End(xlToRight)).Select
    Selection.Copy
    Windows("Relatorio Recebimento.xlsx").Activate
    Range("A3").Select
    ActiveSheet.Paste
    Application.CutCopyMode = False
    ActiveSheet.Protect DrawingObjects:=True, Contents:=True, Scenarios:=True _
    , AllowFiltering:=True
    Workbooks("Relatorio Recebimento.xlsx").Save
    Workbooks("Relatorio Recebimento.xlsx").Close
    Application.ScreenUpdating = True
    Windows("Relatorio_Recebe.xlsm").Activate
End Sub
                                                                                                	Desenvolvo pequenas soluções em VBA Excel a valores que variam entre R$ 50,00 a R$ 200,00. Se te interessar, entre no meu instagran (vba_excel_desenvolvimento)
Atenciosamente
Wagner Morel
 
                    
                    	
                            Postado : 04/11/2017 7:01 pm