Alan,

Sorry, I typed that on the fly... one of those endwiths shoulda been an endfor. It's corrected below

m_xlsfile = getfile('xls')
oExcel = createobject( "excel.application" )
oExcel.Visible = .t.

oWorkbook = oExcel.Workbooks
oWorkbook.Open( m_xlsfile )

oSheet = oExcel.ActiveSheet

for each oRow in oSheet.Rows
   ?? '.'
   with oRow
      for each oCol in oRow.Cloumns
         ? oCol.Value
      endfor
   endwith
endfor

oWorkbook.Close()
oExcel.Quit()