对excel表格的操作 我想请问一下,一个xls文件有几个sheet构成,请问如何对其中某个sheet操作?还有如何获得一个sheet共有几行?谢谢! 解决方案 » 免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货 var Sheet,Range: OLEVariant;Sheet := ExcelApp.Workbooks[1].WorkSheets[1];Range := Sheet.UsedRange;Range.Rows.Count; 感谢楼上的指导:)还想问一下,如何指定对某一个sheet操作? 例选中第二页:ExcelApp.WorkSheets[2].select;或用:ExcelApp.Workbooks[1].WorkSheets[2]; 设置第2个工作表为活动工作表: ExcelApp.WorkSheets[2].Activate; 或 ExcelApp.WorksSheets[ 'Sheet2' ].Activate; 求一个表中数据的行数:ExcelApp.ActiveSheet.UsedRange.Rows.Count Microsoft VBScript 编译器错误 错误 '800a03f6' 缺少 'End' /iisHelp/common/500-100.asp,行242 Microsoft OLE DB Provider for ODBC Drivers 错误 '80040e07' [Microsoft][ODBC SQL Server Driver][SQL Server]不允许从数据类型 varchar 到数据类型 money 的隐性转换(表 'test.dbo.test',列 'je')。请使用 CONVERT 函数来运行此查询。 /yuan/jd/xs.asp,行82 唉,这怎解决呀, 82行 :将各字段值插入表中。其中有一个字段值为je(金额),设成了money类型。je=100.1total=Ccur(je)total的值本想附给je这个字段,可写表时就报如上错,那这要如何转换? 请教如何用delphi编程实现创建一块虚拟网卡 ◆◆◆ Delphi循环体代码优化的小总结 ◆◆◆ 超难问题!!!如果取得TWebBrowser上网页的宽度和高度? 计算个人所得税算法 如何在treeview中显示指定文件夹中的文件和子文件夹 怎么把IE中的内容拖进WebBrowser,急,急 关于录入和查询的问题 关于timer的一个问题 三层中的事务控制问题 rh,holyfire看过来,有专家分可以拿,依然是窗口问题 能这样锁文件吗? 窗口激活问题
Sheet := ExcelApp.Workbooks[1].WorkSheets[1];
Range := Sheet.UsedRange;
Range.Rows.Count;
ExcelApp.WorkSheets[2].select;
或用:
ExcelApp.Workbooks[1].WorkSheets[2];
ExcelApp.WorkSheets[2].Activate;
或
ExcelApp.WorksSheets[ 'Sheet2' ].Activate;
求一个表中数据的行数:
ExcelApp.ActiveSheet.UsedRange.Rows.Count
je=100.1
total=Ccur(je)
total的值本想附给je这个字段,可写表时就报如上错,那这要如何转换?