急求:Delphi7.0如果删除Excel文档中的第一行? 急求:Delphi7.0如果删除Excel文档中的第一行?在线等待!!!!! 解决方案 » 免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货 uses ComObj;var Excel: OleVariant;begin Excel := CreateOLEObject('Excel.Application'); Excel.WorkBooks.Open('c:\1.xls');//打开 Excel.WorkSheets[1].Rows[1].Delete; //删除第一行 Excel.ActiveWorkbook.Save; // 保存 Excel.Quit;//退出end; 谢谢 liangqingzhi(老之)再加20分,请问如果把第二行的数据复制到第一行,也就是传给第一行???谢谢 把第二行的数据复制到第一行,也就是传给第一行???是不是只想实现复制,而不是删除后在复制,两码是啊?要光复制的话,我觉得得把文件循环读出来,然后Excel.WorkSheets[1].Rows[1]=Excel.WorkSheets[1].Rows[2],然后保存。我只是这样想的,没有试! 谢谢summersky204608() Excel.WorkSheets[1].Rows[1]=Excel.WorkSheets[1].Rows[2]这句不能用,运行后出现“找不到成员”的错误??我现在只是想能够把第二行的数据复制到第一行就行 试试这样:Excel.WorkSheets[1].Rows[2].Copy;Excel.WorkSheets[1].Rows[1].PasteSpecial; 谢谢:liangqingzhi(老之) ( ) 问题已经解决 【急】delphi强制执行语句 在线等!! 如何在Delphi添加控件? 请问如何通过程序把excel里面的数据导入到数据库里面? 在重绘TListBox控件列表项的时候怎么重绘聚焦框? 请问怎么使一个窗体不响应被单击的事件?(被单击后无任何变化,不出现在最顶上) 关于控件的property 有delphi高手吗?高手的才进来!不是的免进! D_Q(A.Dai) 你在不在呀? 一个关于SQL语句的问题 我想做个主页, 大家帮我想个好听的名字吧! 谢谢 关于Indy控件的代理设置的问题!急! 原来使用了TUpdateSQL 现在用了ADO 请问 这个控件用什么办法替代
begin
Excel := CreateOLEObject('Excel.Application');
Excel.WorkBooks.Open('c:\1.xls');//打开
Excel.WorkSheets[1].Rows[1].Delete; //删除第一行
Excel.ActiveWorkbook.Save; // 保存
Excel.Quit;//退出
end;
再加20分,请问如果把第二行的数据复制到第一行,也就是传给第一行???
谢谢
要光复制的话,我觉得得把文件循环读出来,然后Excel.WorkSheets[1].Rows[1]=Excel.WorkSheets[1].Rows[2],然后保存。
我只是这样想的,没有试!
Excel.WorkSheets[1].Rows[1]=Excel.WorkSheets[1].Rows[2]
这句不能用,运行后出现“找不到成员”的错误??
我现在只是想能够把第二行的数据复制到第一行就行
Excel.WorkSheets[1].Rows[2].Copy;
Excel.WorkSheets[1].Rows[1].PasteSpecial;
问题已经解决