Click above to get retro games delivered to your door ever month!

lfindnext()                                                        READWKS.PRG
------------------------------------------------------------------------------------------
 Purpose
   To return subsequent cells from either Lfindfirst() or Lget()

 Syntax
   Lfindnext( aWks )

 Parameters
   aWks      - Spreadsheet handle array

 Returns
   aCell     - Array of cell information
               1)  Cell data
               2)  Cell type
               3)  Physical size in spreadsheet
               4)  Cell address
               5)  Row number
               6)  Column number
               7)  Physical offset in file

 Notes
   Lfindnext() reads the next cell in the spreadsheet. It may start as a
   result of either a call to Lfindfirst() or to Lgetcell().  If a cell
   is found, an array of cell information is returned.  If no cell is
   found, an empty array is returned.

 Example
function main
    LOCAL aWks   := Lread("PAYROLL")
    LOCAL aCell
    if !empty(aWks)
       aCell := LfindFirst(aWks)
       while !empty(aCell)
          ? aCell[1]
          aCell := LfindNext(aWks)
       enddo
       Lclose(aWks)
    endif
return ""

 Category
   Reading spreadsheet files