Copiar hoja solo con Valores VBA

Tengo una macro que me copia varias hojas a un libro nuevo pero solo que me
copie una sola hoja a un libro y que sea solo valores.

Este es el codigo

Sub Macro1()

'selecciona una hoja

Sheets("input").Select

Sheets(Array("hoja 2")).Copy
'creamos un nuevo objeto Libro
Set wb = ActiveWorkbook

'se libera el objeto
Set wb = Nothing

'pegado solo valores

For Each Hoja In Sheets

Hoja.UsedRange.Value = Hoja.UsedRange.Value
Next


End Sub

Donde 'For Each Hoja In Sheets

'Hoja.UsedRange.Value = Hoja.UsedRange.Value
'Next
me copia solo valores en las hojas nuevas. Solo tengo una hoja copiada y
quiere que solo tenga valores!

Como puedo hacer para que en vez de ser For Each Hoja In Sheets solo pegue
los valores a la unica hoja copiada.