Excel - Ayuda

Tengo dos libros en excel.
El primero se llama matriz y el segundo se llama indice
Quiero copiar una hoja llamada valorizacion en el libro Indice pero mi problema es que el libro indice tiene como 60 hojas y la hoja valorizacion debe ser copiada en todas las hojas.
El otro problema es que quiero que el nombre de la hojja ( ejemplo 1220 ) se copie en una celda determinada ( Ejemplo A2 ) de la misma hoja y así sucesivamente en todas las hojas.

Hoja 1220 en A2 de la hoja 1220
Hoja 1221 en A2 de la hoja 1221
Como sería la macro
Gracias

en emagister ya tuviste respuesta

Abraham

Si efectivamente le copio toda las macro y le explico el problema
Le agradesco funciono bien hice unos cambios.

Option Explicit
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

Sub Copiar()
Dim i As Long
Cells.Select
Application.CutCopyMode = False
Selection.Copy
For i = 1 To Sheets.Count
Sheets(i).Select
Range("A1").Select
ActiveSheet.Paste

Next i
End Sub

Sub Nombre()
Dim i As Long
For i = 1 To Sheets.Count
Sheets(i).Select
Range("F2").Value = Sheets(i).Name

Next i

End Sub

En La hoja1 tengo una lista de nombres de hoja corro la macro crear_hojas2()
y crea todas las hojas
En la Hoja2 copio la hoja que voy a copiar a todas las hojas creadas por la macro anterior.
Todo funciona pero copia la hoja 1 y la hoja 2 tambien como puedo evitar que copie las hojas donde estan los datos