Dear Experts

I use following method to export data to Excel

SELECT master1
COPY to C:\gin_exp.xls type xls FIELDS LIKE C*,D* EXCEPT CREDIT,DR_CR

RELEASE ALL LIKE Lo*

loExcel = createobject("Excel.Application")
loWorkbook = loExcel.workbooks.open('C:\gin_exp.xls')
loSheet = loWorkbook.sheets(1)

1) How to make sheet rows height=25
2) How to insert three blank rows at the top of loSheet
3) How to apply following format on loSheet.Range("A7:C10")

FontColor = RGB(255,0,0)
FontSize = 12
FontBold = .T.
DrawBorder= "xlContinuous:xlMedium")

Please Help