大大:怎么用VFP 清空XLS工作簿里的工作表但保留格式

请教各位大大:如何用VFP 清空XLS工作簿里的工作表但保留格式
如题,谢谢。在线等待。
------解决方案--------------------
CLEAR 
EXCEL=Createobject('excel.application')
EXCEL.Workbooks.Add
EXCEL.Visible= .T.
EXCEL.ActiveSheet.Columns(1).NumberFormatLocal="yyyy/m/d"
? EXCEL.Cells(1,1).NumberFormatLocal
EXCEL.Cells(1,1)={^2013/01/01}
EXCEL.Cells(1,2)={^2013/01/02}

EXCEL.ActiveSheet.UsedRange.Select&&选择范围
EXCEL.ActiveSheet.UsedRange.ClearContents&&清空值不清空格式

 excel.Cells(1,1).Select
? excel.Cells(1,1).NumberFormatLocal

*excel.quit
*RELEASE excel