Pegado especial con funcion ").Copy _ Destination

Tengo este codigo para extraer datos desde un libro de excel y pegarlos en otro libro nuevo, el problema esta en que al momento de que me pega los datos los pega con todo y el formato que tenia la celda de la hoja origen, mi pregunta es, como con esta funcion puedo hacer el pegado especial.
'Buscamos todos los archivos del directorio y llevamos los datos
strFic = Dir(strDir & "*.xls")
Do While strFic <> ""
'Fila de la hoja destino libre.
With wbkAct.Worksheets(strDest)
Set rngDest = .Cells(.Rows.Count, 1).End(xlUp).Offset(1, 0)
'Abrir el fichero
If strFic <> wbkAct.Name Then
Set wbkDat = Workbooks.Open(strDir & strFic, 3)
With wbkDat.Worksheets(strHoja)
.Range("C7:G7", "B9:H9").Copy _
Destination:=rngDest 'aqui es cuando pega lo del rango que le indic, pero lo pega con todo y el formato origen
Gracias de antemano.