Este truco muestra como se le puede dar a las celdas los formatos preestablecidos que trae Excel. El formato es una combinación de colores, tipos de letras... etc.
oExcel = CreateObject("Excel.Application")
oExcel.Visible= .T.
oWorkbook = oExcel.Workbooks.Add()
oWorksheet = oWorkbook.Worksheets(1)
k = 1
For i = 1 to 10
For
j = 1 to 10
oWorksheet.Cells(i,j) = k
k = k + 1
Next
Next
oRange = oWorksheet.UsedRange
oRange.AutoFormat(10)
Si tienes inquietudes, sígueme en Twitter para contactarme.
Seguir a @davamadort¿Deseas que tu sitio web aparezca en buscadores como google, yahoo, msn?
Contrata un plan de hosting en www.winnethost.com y recibes totalmente gratis el registro de tu sitio web en más de 24 buscadores, entre ellos google, yahoo, msn
El Sitio La Web de Davphantom se encuentra hospedado en WinNetHost.com