Копирование данных из 2-ух листов в один

[Marishka2011]

Помогите, пожалуйста.

Есть 2 листа с данными, нужен макрос, который создаст новый лист, копируя данный из предыдущих двух. При этом нужно, чтобы это был каждый раз новый лист и чтобы брал данные из последних созданных листов.

что поменять в значениях, чтобы каждый раз данные брались их новых листов,а не из старых?

Вот, что сама "навояла".

заранее спасибо!


Sub Макрос5()
'
' Макрос5 ' Макрос

'
Sheets.Add After:=Sheets(Sheets.Count)
Sheets("01à").Select
Cells.Select
Range("CI42").Activate
Selection.Copy
Sheets(Sheets.Count).Select
ActiveSheet.Paste
ActiveWindow.SmallScroll Down:=24
Range("BT45:CG45").Select
Application.CutCopyMode = False
ActiveCell.FormulaR1C1 = "='01à'!RC:RC[13]+'02à2'!R[-10]C[-67]"
Range("BT37:CG37").Select
ActiveCell.FormulaR1C1 = "='01à'!R[1]C:R[1]C[13]"
Range("BT38:CG38").Select
End Sub