RE:pasar de un dbf a excel
Este codigo lo encuentras en la siguiente página
http://www.clubdelphi.com/foros/showthread.php?s=&threadid=4630
// Margen, título y cabecera
XlSheet.Cells[1,1].ColumnWidth := 5; // Ancho de la columna A
// Ancho de las columnas
XlSheet.Cells[1,2].ColumnWidth := 5;
XlSheet.Cells[1,3].ColumnWidth := 28;
XlSheet.Cells[1,4].ColumnWidth := 8;
XlSheet.Cells[1,5].ColumnWidth := 10;
XlSheet.Cells[1,6].ColumnWidth := 12;
// Rango
Range := XlSheet.Range['B2:F2']; // Asignar el rango
Range.Font.Name := 'Arial';
Range.Font.Size := 14;
Range.Font.Color := clBlue;
Range.RowHeight := 21; // Altura de la fila
// Range.Columns.AutoFit; // Ajustar las columnas automáticamente
// Range.ColumnWidth := 25; // Ancho de las columnas para un rango determinado
Range.Columns.Interior.ColorIndex := 19; // 1: Black; 2: White; 3: Red; 4: Lime;
// 5: Blue; 6: Yellow; 7: Fuchsia; 8: Cyan
// 9: Maroon; 10: Green; 11: Navy; 12: Olive
// 13: Purple; 14: Teal; 15: Silver; 16: Gray
// .......... bis 56 max.
// Ejemplo de pasar los datos a una simple celda
XlSheet.Cells[2,3] := 'Example of Microsoft Excel 97 from Delphi 32';
XlSheet.Cells[3,6] := FormatDateTime('mm/dd/yyyy',Now);