¿Cómo puedo hacer una macro VBA que genere una fórmula trayendo datos de otras solapas si las solapas tienen forma de fecha?

Armé una macro que crea hojas en un informe y las nombra con el día de la fecha más una T o M dependiendo del turno que se trate, tarde o mañana. Tengo que agregar que en esta hoja un código que ponga una fórmula para sumar valores de la hoja nueva, y de las hojas de ayer. Lo estoy haciendo de forma muy rudimentaria y la macro funciona hasta la creación de la hoja pero no logro encontrar cómo escribir la última parte. Copio abajo lo que tengo escrito, muchas gracias al que me pueda ayudar!

Sub Crear_nuevo_informe_tarde2()
'
' Crear_nuevo_informe_tarde2 Macro
'

'
Dim Anterior As Worksheet

ActiveSheet.Select
ActiveSheet.Copy Before:=Sheets("Bitácora diaria")
ActiveSheet.Name = Format(Date, "dd-mmm-yy") + " - T"
Range("E1").Select
ActiveCell.FormulaR1C1 = Format(Date, "dd-mmm-yy")
Range("E1").Select
Selection.Copy
Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _
:=False, Transpose:=False
Range("E2").Select
Application.CutCopyMode = False
ActiveCell.FormulaR1C1 = "Tarde"
Range("E3").Select
With ActiveWorkbook.ActiveSheet.Tab
.color = 13311
.TintAndShade = 0
End With                         hasta acá funciona bien
Anterior.Name = Format(Date - 1, "dd-mmm-yy") + " - M"
Range("D14").FormulaR1C1 = "=SUM(B14,'Anterior'!B14)"

End Sub

Añade tu respuesta

Haz clic para o