vb保存excel文件的问题?
代码如下:
Dim objExl As Excel.Application '声明对象变量
Set objExl = New Excel.Application '初始化对象变量
objExl.SheetsInNewWorkbook = 1 '将新建的工作薄数量设为1
objExl.Workbooks.Add '增加一个工作薄
objExl.Sheets(objExl.Sheets.Count).Name = "book1" '修改工作薄名称
objExl.Sheets("book1").Select '选中工作薄<月报表>
objExl.Range(objExl.Cells(1, 1), objExl.Cells(1, 12)).Select
objExl.Selection.Merge
'objExl.Selection.NumberFormatLocal = "@" '设置格式为文本
objExl.Cells(1, 1) = "月报表"
objExl.Quit
Set objExl = Nothing '清除对象
现在执行完,会弹出一个保存的对话框,我想不出现这个对话框,而由我指定路径和文件名。
怎么实现?谢谢
Dim objExl As Excel.Application '声明对象变量
Set objExl = New Excel.Application '初始化对象变量
objExl.SheetsInNewWorkbook = 1 '将新建的工作薄数量设为1
objExl.Workbooks.Add '增加一个工作薄
objExl.Sheets(objExl.Sheets.Count).Name = "book1" '修改工作薄名称
objExl.Sheets("book1").Select '选中工作薄<月报表>
objExl.Range(objExl.Cells(1, 1), objExl.Cells(1, 12)).Select
objExl.Selection.Merge
'objExl.Selection.NumberFormatLocal = "@" '设置格式为文本
objExl.Cells(1, 1) = "月报表"
objExl.Quit
Set objExl = Nothing '清除对象
现在执行完,会弹出一个保存的对话框,我想不出现这个对话框,而由我指定路径和文件名。
怎么实现?谢谢
...全文
相关推荐
vb中excel文件操作函数
本文将详细介绍 VB 中 Excel 文件操作函数的使用方法,并对常见问题进行解答。一、Excel 文件操作函数VB 中有多种方式可以操作 Excel 文件,包括打开、更改、新建、打印等。
.NET 使用Excel PIA组件生成Excel
为了解决这个问题,可以考虑使用其他非交互式库,如EPPlus,它是一个轻量级且不依赖Excel的.NET库,能够创建、读取和修改Excel文件。
VB 合并多个Excel文件到新的Excel中
**错误处理**:在整个过程中,应添加适当的错误处理代码,以防文件不存在、权限问题或其他异常情况。
vb中将数据保存到excel
### vb中将数据保存到Excel在VB编程中,经常需要处理各种数据并将其导出为Excel文件,以便于进一步分析或与其他系统共享。
VB.net实现无需安装Excel由代码创建Excel文件纯代码创建Excel文件
保存文件:使用`SaveAs`方法保存到指定的文件路径。


VB基础类
