用这种方式还不如单个的表查询快。
要在60个表之间不停地切换。不好定位的。
单个的表放一个文件夹里。还好查找点。

offic2003开始有查找全部的选项（即在工作簿内的所有工作表中查找），很方便的，不用切换

还没用过这功能。。。

请参考：
PRIVATE i,m_file
SET PATH TO SYS(5)+SYS(2003),excel\
myeole=CREATEOBJECT("Excel.application")
WITH myeole
    .visible=.t.
    .Workbooks.add
    FOR i=1 TO 60
        IF i>2
            .sheets(i).Select
            .Worksheets.Add
        ENDIF
        m_file=STR(200700+i,6)+".xls"
        .workbooks.open(SYS(5)+SYS(2003)+"\excel\"+m_file)
        .ActiveSheet.UsedRange.Cells.Copy
        .Windows("Book1").Activate
        .Sheets(i).Select
        .ActiveSheet.Name = m_file
        .ActiveSheet.Paste
        .windows(m_file).Close
    NEXT
    .ActiveWindow.DisplayZeros = .F.
    .ActiveWorkbook.close(.t.)
    .quit      
ENDWITH
RELEASE myeole

在Excel写VBA就可以处理，不用绕出来用VFP。