ExcelApplication中保存并关闭excel文件怎么写？

pcxxx 2005-11-03 08:05:59

我用打开一个模板文件，填写完数据，要保存到指定文件夹并关闭文件，老是出错，请帮忙指点一下
我这样写的，
.....
mypath:=ExtractFileDir(paramstr(0));
str:=datetostr(now);
......
ExcelApplication1.Save(mypath+'\wj\'+str+'wj.xls');
ExcelApplication1.Quit;

是ExcelApplication1.Save(mypath+'\wj\'+str+'wj.xls');
这句的错误，应该怎样写呢。执行时它保存到了文件夹下，但又出对话框让saveas到我的文档中，点保存不提示提示，但点取消就出错，怎么样不让再出现保存框。

...全文

576 9 打赏收藏转发到动态举报

写回复

9 条回复

切换为时间正序

请发表友善的回复…

发表回复

Elmer728 2006-03-31

打赏
举报

回复

ExcelApp:=unassigned;
就OK了

hanqi609 2005-11-12

打赏
举报

回复

你们太可爱了

pcxxx 2005-11-03

打赏
举报

回复

ExcelApp.activeworkbook.SaveAs('路径+文件名');
出现错误no enough actual parameters，
我加入NULL，也出错，
加入0，也出错，
应该还要加什么呀，请指点

lunkie 2005-11-03

打赏
举报

回复

ExcelApp.activeworkbook.SaveAs('路径+文件名');
ExcelApp.workbooks.close;
ExcelApp.quit;

pcxxx 2005-11-03

打赏
举报

回复

怎么还是出错呀，写具体点好吗，

aiirii 2005-11-03

打赏
举报

回复

>>但又出对话框让saveas到我的文档中

ExcelApp.ActiveWorkbook.Saved[0] := True;

aiirii 2005-11-03

打赏
举报

回复

ExcelWs.Disconnect;
ExcelWb.Disconnect;

ExcelApp.Disconnect;
ExcelApp.Quit;
FreeAndNil(ExcelWs);
FreeAndNil(ExcelWb);
FreeAndNil(ExcelApp);

konhon 2005-11-03

打赏
举报

回复

ExcelApplication1.DisplayAlerts := False; // 不是提示
ExcelApplication1.ActiveWorkbook.SaveAs(FileName := FSaveAs);
ExcelApplication1.DisplayAlerts := True;

pcxxx 2005-11-03

打赏
举报

回复

有没有大侠给点指示呀，以上都不行呀

public void print(DataGridView dataGridView1) { //导出到execl try { //没有数据的话就不往下执行 if (dataGridView1.Rows.Count == 0) return; //实例化一个Excel.Application对象 Microsoft.Office.Interop.Excel.Application excel = new Microsoft.Office.Interop.Excel.Application(); //让后台执行设置为不可见，为true的话会看到打开一个Excel，然后数据在往里写 excel.Visible = false; //新增加一个工作簿，Workbook是直接保存，不会弹出保存对话框，加上Application会弹出保存对话框，值为false会报错 excel.Application.Workbooks.Add(true); //生成Excel中列头名称 for (int i = 0; i < dataGridView1.Columns.Count; i++) { excel.Cells[1, i + 1] = dataGridView1.Columns[i].HeaderText; } //把DataGridView当前页的数据保存在Excel中 for (int i = 0; i < dataGridView1.Rows.Count - 1; i++) { for (int j = 0; j < dataGridView1.Columns.Count; j++) { if (dataGridView1[j, i].ValueType == typeof(string)) { excel.Cells[i + 2, j + 1] = "'" + dataGridView1[j, i].Value.ToString(); } else { excel.Cells[i + 2, j + 1] = dataGridView1[j, i].Value.ToString(); } } } //设置禁止弹出保存和覆盖的询问提示框 excel.DisplayAlerts = false; excel.AlertBeforeOverwriting = false; //保存工作簿 excel.Application.Workbooks.Add(true).Save(); //保存excel文件 excel.Save("C:" + "\\KKHMD.xls"); //确保Excel进程关闭 excel.Quit(); excel = null; } catch (Exception ex) { MessageBox.Show(ex.Message, "错误提示"); } }

OpenExcel 是一种命令行实用程序，它提供了打开一个或多个 Excel 文件、等待指定秒数然后关闭工作簿的功能。另一种选择是使用 TASKKILL，但是这种方法会关闭 Excel 的所有实例。 OpenExcel 的优点是它只关闭特定的工作簿。 OpenExcel 对于通过事件 Workbook_Open 和 Workbook_BeforeClose 实现 VBA 脚本的 Excel 文件很有用。例如，Workbook_Open 事件可能使用第三方加载项来下载数据。 Workbook_BeforeClose 事件将下载的数据值（不是公式）保存到单独的文件中。数据下载可能需要几分钟才能完成。但是，尝试使用 VBA 执行等待会阻止下载操作。示例：OpenExcel.exe -File:c:\temp\data.xls -Visible -CloseSeconds:15 -ShowCountDown 注意：VBA 代码 Application.OnTime Now + TimeValue("00:00:59"), "MethodName" 可能是一种替代解决方案。

函数的单词都认识，但一用它来写公式，要么写不出来，要么结果不对，更别说编写嵌套公式那些函数名称、函数参数的作用总是记不住，公式总是编制不对; 用Excel多年,还是只会常用的那三五个函数。本次课程结合职场...

我试图打开现有的Excel 2013文件,添加数据,然后保存(同名),然后关闭它,然后关闭Excel.代码将打开文件,选择正确的工作表并写入数据,但是当我尝试保存它时,我得到属性错误.我错过了图书馆吗？这是代码：import win32com.client as win32def Inventory_Status():excel = win32.gencache.EnsureDispatch('E...

Uipath Excel Application Scope详解

5,392

社区成员

262,729

社区内容

发帖

与我相关

我的任务

社区管理员

加入社区

近7日
近30日
至今

加载中

查看更多榜单

社区公告

暂无公告

试试用AI创作助手写篇文章吧

+ 用AI写文章