No VBA (Visual Basic for Applications), seria mais ou menos assim:
Sub MacroCopyCurrentCheque()
'
ActiveCell.Offset(0, 0).Select
Range(Selection, Selection.End(xlToRight)).Select
Selection.Copy
Windows("Map2").Activate
Range("A1").Select
Selection.End(xlDown).Select
ActiveCell.Offset(1, 0).Select
ActiveSheet.Paste
Windows("Map1").Activate
End Sub
Não é possível ser mais específico sem mais informações do seu lado. (Versão do Excel, como você imprime exatamente, com uma macro? Nomes de planilha? Você sabe como usar o VBA, etc)