在Delphi中用
MSExcel:=CreateOLEObject('Excel.Application');
MSExcel.WorkBooks.Open('d:\test.xls');打开一个excel文件, 请问:问题1: 怎么设定某一个工作表(SheetN)为当前活动页面?
问题2: 怎么取得表格拥有数据的最大列数?

解决方案 »

  1.   

    问题1: 试试MSExcel.WorkBooks[1].WorkSheets[N].Activate
    问题2:  还不知道
      

  2.   

    请看看:http://www.cnblogs.com/luckyjan/category/13329.html问题1: 试试MSExcel.WorkBooks[1].WorkSheets[N].Activate
    问题2:  这个涉及VBA的东西,类似:
        Range("A1").Select
        Range(Selection, ActiveCell.SpecialCells(xlLastCell)).Select 
      上面一句就是得到最后一行最后一列
      

  3.   

    谢谢关注 及回复!再问多一个问题:
    就是这么读取 批注内容? 用 sComment:= MSExcel.Range['C1'].Comment.Text;  报错?!
      

  4.   

    sComment:= MSExcel.WorkBooks[1].WorkSheets[N].Range['C1'].Comment.Text;