если вы считаете, что это заказ, то вы и называйте цену.  
 
а результаты попыток    
Sub Макрос1()  
'  
' Макрос1 Макрос  
'  
 
'  
   Sheets.Add After:=Sheets(Sheets.Count)  
   Sheets("Лист1").Select  
   ActiveWindow.SmallScroll Down:=-24  
   Range("A1:N71").Select  
   Selection.Copy  
   Sheets("Лист2").Select  
   Range("A1").Select  
   ActiveSheet.Paste  
   ActiveWindow.View = xlPageBreakPreview  
   Application.CutCopyMode = False  
   Set ActiveSheet.VPageBreaks(1).Location = Range("O1")  
   ActiveWindow.SmallScroll Down:=15  
   Range("N70:N71").Select  
   ActiveSheet.HPageBreaks(1).DragOff Direction:=xlDown, RegionIndex:=1  
   Windows("Ремонт_финал.xls").Activate  
   Range("A10").Select  
   ActiveCell.FormulaR1C1 = "=[Заявка_Ремонт_Форма.xlsx]Лист2!R1C14"
   Range("C10").Select  
   ActiveCell.FormulaR1C1 = "=[Заявка_Ремонт_Форма.xlsx]Лист2!R24C4"
   Range("D10").Select  
   ActiveCell.FormulaR1C1 = "=[Заявка_Ремонт_Форма.xlsx]Лист2!R25C4"
   Range("E10").Select  
   ActiveCell.FormulaR1C1 = "=[Заявка_Ремонт_Форма.xlsx]Лист2!R26C4"
   Range("F10").Select  
   ActiveCell.FormulaR1C1 = "=[Заявка_Ремонт_Форма.xlsx]Лист2!R27C4"
   Range("F11").Select  
End Sub  
 
я прекрасно понимаю, что надо учиться, но я не программист по натуре.

Доброго всем здравия.  
не пинайте чайника слишком сильно.  
 
вопрос.  
нужен макрос, которые бы добавлял новый лист в файл:Заявка_ремонт_Форма, копировал в новый лист форму заявки, потом в файле:Ремонт_финал,в пустую строку сводной таблицы вводились в соответсвующие ячейки значения из первого файла. при создании нового листа ,данные вносились бы в следующую строку и так далее.  
 
файлы во вложении