>Budianto,
>IMHO easiest is to use one of predefined formats.
>

Use customer
>Copy to customerxls type xls
>
>#include xlconstants.h
>oExcel=createobject('Excel.Application')
>With oExcel
>  .Workbooks.Open(sys(5)+curdir()+'customerxls.xls')
>  With .ActiveWorkBook.ActiveSheet
>    .Range("A1").AutoFormat(xlRangeAutoFormatColor2)
>*!*	    *Format headers
>*!*	    .Cells(1,1).VALUE = "Customer Id"
>*!*	    * Format the data
>*!*	    .RANGE("1:1").FONT.Bold=.T.
>*!*	    .RANGE("L:L").NumberFormat = [_($* #,##0.00_);_($* (#,##0.00);_($* ""-""??_);_(@_)]
>*!*	    With .Range('A:A').Font
>*!*	      .Bold = .t.
>*!*	      .Size = 12
>*!*	      .Color = rgb(255,0,0)
>*!*	    Endwith
>*!*	    With .Range('B:B').Font
>*!*	      .Bold = .t.
>*!*	      .Italic=.t.
>*!*	      .Size = 12
>*!*	      .Color = rgb(0,0,255)
>*!*	    Endwith
>*!*	    With .Range('E:E').Font
>*!*	      .Bold = .t.
>*!*	      .Italic=.t.
>*!*	      .Size = 12
>*!*	    Endwith
>*!*	    .Columns.Autofit
>    .Range("A1").select
>  Endwith
>  .visible = .t.
>Endwith
>

Comment autoformat line and uncomment the commented to see custom formatting.
>Cetin


Thank you very much, Cetin, it work very well, but I still can't find the way to make a line or a box and to align a text in a column.
btw, where can I find this Excel setting in Visual Foxpro ?

TIA

Budianto