FoxPro/Visual FoxPro - SObre excel y Vfp

UNA SUPER PREGUNTA A LOS EXPERTO.... YA LOGRO ENVIAR DATOS A EXCEL DE UN .DBF, PEGAR UNA IMAGEN PERO COMO PUEDO POR MEDIO DE UNA RANGO DE CELDAS ASIGNARLE UN BORDE .... MAS RAPIDO DAR FORMATO A MI ARCHIVO DE EXCEL... DESDE VFP,

A QUIEN ME PUEDA AYUDAR ... GRACIAS

Mira, yo he creado esta rutina para abrir un archivo de excel y asignarle formato a las filas y columnas. fijate si puedes adaptarlo. Si el libro de excel ya tiene formato no los cambia pero.

gcTableName = GETFILE('XLS', 'Nombre de archivo:')
IF EMPTY(gcTableName) && Esc presionada
RETURN
ENDIF
oExcel=CREATEOBJECT("Excel.Application")
oExcel.Application.WorkBooks.Open(gcTableName)
oExcel.Application.StandardFontSize = 8
oExcel.Application.Range("A1:IV16384").Font.Color = RGB (0,0,0)
oExcel.Application.Range("A1:IV16384").Font.Size = 8
*****************************************************************
oExcel.Application.Rows(1).Font.Bold = .T.
oExcel.Application.Rows(1).Font.Color = RGB (0,0,0)
oExcel.Application.Range("A1:H1").Font.Size = 10
oExcel.Application.Columns(1).ColumnWidth = 10
oExcel.Application.Columns(2).ColumnWidth = 30
oExcel.Application.Columns(3).ColumnWidth = 25
oExcel.Application.Columns(4).ColumnWidth = 25
oExcel.Application.Columns(5).ColumnWidth = 7
oExcel.Application.Columns(6).ColumnWidth = 30
oExcel.Application.Columns(7).ColumnWidth = 35
oExcel.Application.Columns(8).ColumnWidth = 30
oExcel.Application.Visible = .T.