Foro de Excel

Tengo un libro con una macro donde se crea automaticamente las hojas señalando la lista de la hoja principal, tengo dos preguntas

1.- Como puedo hacer para pegar una hoja llamada valorizacion que contiene formulas de otro libro a todas las hojas creadas automaticamente.

2.- Como puedo colocar el nombre de cada hoja en la celda F2 para que pueda jalar otros datos de otro libro

Sub crear_hojas2()
    Dim Lista As Range
    Dim iX As Long
   
   
    On Error GoTo Cancelar
   
    Set Lista = Application.InputBox(prompt:="Señalar rango de la lista", _
                    Title:="Lista de nombres", Type:=8)
   
   
    Application.ScreenUpdating = False
   
    For iX = 1 To Lista.Count
        If chequear_hoja(Lista(iX)) = False Then
            Sheets.Add after:=Sheets(Sheets.Count)
            ActiveSheet.Name = Lista(iX)
        End If
    Next iX
   
    Sheets("Hoja1").Activate
   
    Application.ScreenUpdating = True
   
Cancelar:
End Sub

Function chequear_hoja(sheetName As String) As Boolean

    Dim wkb As Worksheet

    On Error Resume Next
    Set wkb = Sheets(sheetName)
    On Error GoTo 0

    chequear_hoja = IIf(Not wkb Is Nothing, True, False)
End Function

hoja2.jpg Tamaño: 94263 Tipo: image/pjpeg

Libro1.jpg Tamaño: 113780 Tipo: image/pjpeg