FoxPro/Visual FoxPro - Vfp y Excel ayuda

Hola amigos:

Tengo este titulo "Tipo de Pago" que lo digito en la celda A1, pero quisiera que mediante automatizacion ese titulo se me centre en las celdas A1 y A3, que lo centre y ajuste el texto en esas 3 celdas.

Si alguien conoce como hacerlo por favor ayudenme.
Saludos.

hola que tal amigo he aqui un buen ejemplo, e incluso a mi me serivio en su momento
si no te sirve me avisas yo tengo algo mas completo automatizado de informes.

he aqui una buena guia de todoexperto.com:
http://www.todoexpertos.com/categorias/tecnologia-e-internet/bases-de-datos/visual-foxpro/respuestas/1041027/automatizacion-excel

saludes
Douglas
From Nicaragua

hola Douglas !!!
me podrias ayudar ? casi tengo el mismo problema, tengo el codigo que muestro abajo funciona bien pero no puedo centrar los titulo (DELEGACION CUAHTEMOC etc. etc) gracias de antemano.

Close Tables All
Use Base
Hoja_Xls = Sys(5)+Curdir()+'Pagina'+".xls"
Copy Fields num_emp,nombre,direccion,telefono ;
To (Hoja_Xls) Type Xl5
oExcel = Createobject('Excel.Application')
With oExcel
.workbooks.Open(Hoja_Xls)
.ActiveWorkbook.ActiveSheet.UsedRange.Columns.Autofit
.Selection.EntireRow.Insert
.ActiveCell.FormulaR1C1 = "DELEGACION CUAUHTEMOC"
.Range("A2").Select
.Selection.EntireRow.Insert
.ActiveCell.FormulaR1C1 = "SUBDIRECCION DE RECURSOS HUMANOS"
.Range("A3").Select
.Selection.EntireRow.Insert
.ActiveCell.FormulaR1C1 = "U.D. DE MOVIMIENTOS DE PERSONAL"
.Range("A4").Select
.Selection.EntireRow.Insert
.ActiveCell.FormulaR1C1 = "REPORTE DE EMPLEADOS"
.ActiveWorkbook.Save
.Visible = .T.
Endwith