Recorrer una planilla Excel desde VFP

Con este código podemos recorrer una Planilla de Excel desde Visual FoxPro y ver el contenido de todas sus celdas.

*-- Creo el objeto Excel
loExcel = CREATEOBJECT("Excel.Application")
WITH loExcel.APPLICATION
  .VISIBLE = .F.
  *-- Abro la planilla con datos
  .Workbooks.OPEN("C:\MiPlanilla.xls")
  *-- Cantidad de columnas
  lnCol = .ActiveSheet.UsedRange.COLUMNS.COUNT
  *-- Cantidad de filas
  lnFil = .ActiveSheet.UsedRange.ROWS.COUNT
  *-- Recorro todas las celdas
  FOR lnI = 1 TO lnCol
    FOR lnJ = 1 TO lnFil
      ? CHR(lnI+64) + ALLTRIM(STR(lnJ)) + ': '
      ?? .activesheet.cells(lnJ,lnI).VALUE
    ENDFOR
  ENDFOR
  *-- Cierro la planilla
  .Workbooks.CLOSE
  *-- Salgo de Excel
  .Quit
ENDWITH
RELEASE loExcel

Al recorrerla también podemos cambiar los valores de las celdas, solo deberiamos guardar los cambios antes de cerrar la planilla con:

loExcel.APPLICATION.activeworkbook.SAVE