¿Cómo conservar el formato de archivo en una copia generada por macros?

Hola Experto,
Tengo la siguiente inquietud.
He creado una macro en excel que me permite conservar información importante de usuarios que llegan a mi oficinas (nombre, Cedula, dirección, tipo de solicitud, etc). Como veo la necesidad de realizar reportes emplee un código para guardar la información que voy recopilando en un libro ubicado en una dirección diferente. El problema es que al exportar el archivo no se me conserva el formato y por ende la información que exporto se ve afectada notablemente. El código que emplee es el siguiente:
Set MeExcel = CreateObject("Excel.Application")
Set MeLibro = MeExcel.Workbooks.Add
Set MeHoja = MeLibro.Worksheets.Item(1)
For lColumna = 1 To 255
If Hoja1.Cells(1, lColumna) = "" Then
lColumnaMaxima = lColumna - 1
Exit For
End If
Next
For lFila = 1 To 65000
If Hoja1.Cells(lFila, 1) = "" Then
lFilaMaxima = lFila - 1
Exit For
End If
Next
For lFila = 1 To lFilaMaxima
For lColumna = 1 To lColumnaMaxima
MeHoja.Cells(lFila, lColumna) = Hoja1.Cells(lFila, lColumna)
Next
Next
MeLibro.SaveAs "C:\Users\user\Documents\Área Social 2011\Archivos esenciales PQR\Peque\Analisis_PQ.xls"
MeLibro.Saved = True
MeLibro.Close
Set MeHoja = Nothing
Set MeLibro = Nothing
Set MeExcel = Nothing
Agradezco de antemano su colaboración y pronta respuesta.