Copiar datos de un archivo a otro

Muy buenas tardes experto, necesito de su apoyo, pues tengo esta macro... Lo que hace la macro es:

Estando en Carlos2 al momento que presiono el botos de la macro está me ejecuta una rutina que hace que copie un rango de celdas de Carlos 1 y los pegue en Carlos2 y cierre el archivo sin que ni se note que se está abriendo el archivo de origen de los datos, el detalle que tengo es que me copia las formulas, formatos y todo el contenido de las celdas y las pega y pues lógico que sin formulas pues me salen todos los valores en "0", adjunto la rutina que estoy utilizando, estoy usando la versión profesional del office 2010.

De ante mano gracias por la ayuda,

Private Sub CommandButton1_Click()
Dim strArchivo As String
Dim oLibro As Workbook
strArchivo = "d:\Carlos1.xlsm"
If Dir(strArchivo) = "" Then
MsgBox "No existe el archivo en la ruta indicada."
Exit Sub
End If
Application.ScreenUpdating = False
On Error Resume Next
Set oLibro = Workbooks(Dir(strArchivo))
On Error GoTo 0
If oLibro Is Nothing Then Set oLibro = Workbooks.Open(strArchivo)
oLibro.Worksheets("Hoja1").Range("G2:G13").Copy _
Workbooks("Carlos2.xlsm").Worksheets("Hoja2").Range("C3")
oLibro.Close False
Set oLibro = Nothing
Application.ScreenUpdating = True
End Sub