Macro borrar celdas

Hola Gustavo;
Tengo un problema con una de las macros queme has enseñado, es esta:
Sub Macro2()
Range(Cells(ActiveCell.Row, 6), Cells(ActiveCell.Row, 12)).Clear
End Sub
La macro borra las celdas desde las columnas nº 6 hasta la 12, de la fila seleccionada.
El problema que tengo es que solo quería que borrara los datos pero también me borra el formato de las celdas.
¿Es posible que se mantenga el formato y solo borre los datos?
Gracias por tu ayuda, no se como agradecerte...
Saludos / Paco