¿Duda con macro vba excel, mejorar, arreglar?

Bueno veamos si me pueden ayudar, he creado una macro que crea tantas hojas como nombres en una lista hay y esas paginas tienen un formato en especifico que copio de una hoja ya existente, ni problema consiste en que dependiendo de la pagina necesito que cambien algunas formulas, como logro hacer esto? Les dejo el código que tengo hayas ahora a ver si me dan una mano

Sub CopiarHojaFormato()

Application.ScreenUpdating = False

Dim celda As Range

For Each celda In Worksheets("Nomina24h").Range("ah13:ah35")

Worksheets("1").Copy After:=Worksheets(Worksheets.Count)

Next i ActiveSheet.Name = celda

Range("a1").Value = celda

Next End Sub