社区
VB
帖子详情
VB.net中Excel文件的保存问题!急!!
zw110110
2005-03-25 08:49:44
如何写代码使得Excel文件保存时在指定的文件夹路径下,并且显示当时的时间和日期!
...全文
338
10
打赏
收藏
VB.net中Excel文件的保存问题!急!!
如何写代码使得Excel文件保存时在指定的文件夹路径下,并且显示当时的时间和日期!
复制链接
扫一扫
分享
转发到动态
举报
AI
作业
写回复
配置赞助广告
用AI写文章
10 条
回复
切换为时间正序
请发表友善的回复…
发表回复
打赏红包
tl_pear
2005-03-25
打赏
举报
回复
Dim xlApp As Excel.Application
xlApp = CType(CreateObject("Excel.Application"), Excel.Application)
‘把EXCEL可见
xlApp.Visible = True
Dim wkbNew As Excel.Workbook
objWB = xlApp.Workbooks.Add
'在系统里不能响应excel里的关闭事件,所以要按你的要求保存文件的话,就只有在创建后执行保存功能,当你修改后,才会找到保存路径。
If SaveFileDialog1.ShowDialog() = DialogResult.Cancel Then
Exit Sub
Else
objWB.SaveAs(FileName:=SaveFileDialog1.FileName + Format(Now, "yyyy-MM-dd HH/mm/ss")+ ".xls" _
, FileFormat:=XlWindowState.xlNormal _
, Password:="" _
, WriteResPassword:="" _
, ReadOnlyRecommended:=False _
, CreateBackup:=False)
End If
tl_pear
2005-03-25
打赏
举报
回复
Dim xlApp As Excel.Application
xlApp = CType(CreateObject("Excel.Application"), Excel.Application)
‘加上这句,就是把excel 可见,
xlapp.Visible = True
Dim wkbNew As Excel.Workbook
objWB = xlApp.Workbooks.Add
’按你的要求保存文件,是不能在关闭EXCEL时保存的。因为你在VB。NET里不能响应excel的关闭事件,只有在创建的时候按你的要求保存!
If SaveFileDialog1.ShowDialog() = DialogResult.Cancel Then
Exit Sub
Else
objWB.SaveAs(FileName:=SaveFileDialog1.FileName + Format(Now, "yyyy-MM-dd HH/mm/ss")+ ".xls" _
, FileFormat:=XlWindowState.xlNormal _
, Password:="" _
, WriteResPassword:="" _
, ReadOnlyRecommended:=False _
, CreateBackup:=False)
End If
zzzjaychung
2005-03-25
打赏
举报
回复
那你就调用保存对话框好了。
再将你要保存的名字先定义好,加到保存文件名中。
zw110110
2005-03-25
打赏
举报
回复
谢谢你!
我是要关闭文件时!出现的对话框为指定的路径,文件名能够显示时间日期!
你这样写文件都没打开就出来了保存文件对话框!
tl_pear
2005-03-25
打赏
举报
回复
下面是我编译已经通过的!
Dim xlApp As Excel.Application
xlApp = CType(CreateObject("Excel.Application"), Excel.Application)
Dim wkbNew As Excel.Workbook
objWB = xlApp.Workbooks.Add
If SaveFileDialog1.ShowDialog() = DialogResult.Cancel Then
Exit Sub
Else
objWB.SaveAs(FileName:=SaveFileDialog1.FileName + Format(Now, "yyyy-MM-dd HH/mm/ss")+ ".xls" _
, FileFormat:=XlWindowState.xlNormal _
, Password:="" _
, WriteResPassword:="" _
, ReadOnlyRecommended:=False _
, CreateBackup:=False)
End If
zw110110
2005-03-25
打赏
举报
回复
这样写不行!还是报错!
xlBook 已进行过定义
tl_pear
2005-03-25
打赏
举报
回复
Dim xlApp As Excel.Application
Dim xlBook As Excel.Workbook
xlApp = CType(CreateObject("Excel.Application"), Excel.Application)
’把xlBook = xlApp.ActiveWorkbook改为下面这一句,
xlBook = xlApp.Workbooks.Add
xlBook.SaveAs(xlApp.ActiveWorkbook, FolderPathData & DataFolderInError & FileHeaderInError & GetFileId() & ".xls")
Public Function GetFileId() As String
Dim s As System.DateTime
GetFileId = Format(s.Date, "yymmdd") & "-" & Format(s.TimeOfDay, "HHMM")
End Function
zw110110
2005-03-25
打赏
举报
回复
Dim xlApp As Excel.Application
Dim xlBook As Excel.Workbook
xlApp = CType(CreateObject("Excel.Application"), Excel.Application)
xlBook = xlApp.ActiveWorkbook
xlBook.SaveAs(xlApp.ActiveWorkbook, FolderPathData & DataFolderInError & FileHeaderInError & GetFileId() & ".xls")
Public Function GetFileId() As String
Dim s As System.DateTime
GetFileId = Format(s.Date, "yymmdd") & "-" & Format(s.TimeOfDay, "HHMM")
End Function
能告诉我哪里错了吗?怎么样修改?
hamadou
2005-03-25
打赏
举报
回复
你可以使用saveas的方法,也可以用一个模板excel(比如说这个模板里面写了表头和其他设置),将这个模板复制到指定的路径,然后打开这个复制的文件,多它进行写操作。
farrio
2005-03-25
打赏
举报
回复
保存就是Excel.WorkBook.Save以及Excel.WorkBook.SaveAs。
SaveAs参数是目录。
vb.net
操作
excel
文件
VB.NET
操作
Excel
文件
是指通过
VB.NET
语言来操作
Excel
文件
,实现数据的显示、格式设置和
保存
等功能。本文将详细介绍
VB.NET
操作
Excel
文件
的过程,包括添加引用、定义
Excel
对象、操作
Excel
单元格、设置...
vb.net
编程读取
excel
文件
中
的数据
在
VB.NET
编程
中
,读取
Excel
文件
是常见的任务,尤其在数据处理和分析场景
中
。以下将详细讲解如何使用
VB.NET
来实现这一功能,并提供一些关键知识点。 首先,要读取
Excel
文件
,我们需要一个能够与
Excel
文件
交互的库。...
vb.net
将
excel
中
的数据导入到数据库
本篇文章将详细介绍如何使用
VB.NET
实现将
Excel
文件
中
的数据导入到SQL Server数据库的过程,并对代码进行逐行解析,帮助读者更好地理解和掌握这一技术。 #### 1. 连接
Excel
文件
首先,我们需要建立与
Excel
文件
的...
VB.net
Excel
文件
操作
在
VB.NET
中
,
Excel
文件
操作是一项常见的任务,用于数据管理和导出。
VB.NET
提供了Microsoft.Office.Interop.
Excel
命名空间,使得开发者可以使用Visual Basic代码与
Excel
应用程序进行交互,创建、读取和修改
Excel
工作...
vb.net
.zip_
VB.NET
控件_
vb.net
_
vb.net
excel
_
vb.net
控件_
vb.net
控件
2. **
VB.NET
与
Excel
交互**:
VB.NET
提供了Microsoft.Office.Interop.
Excel
命名空间,允许开发者使用
VB.NET
代码操作
Excel
文件
。这包括创建、读取、修改和
保存
Excel
工作簿和工作表。例如,可以创建一个新的
Excel
工作...
VB
16,721
社区成员
110,526
社区内容
发帖
与我相关
我的任务
VB
VB技术相关讨论,主要为经典vb,即VB6.0
复制链接
扫一扫
分享
社区描述
VB技术相关讨论,主要为经典vb,即VB6.0
社区管理员
加入社区
获取链接或二维码
近7日
近30日
至今
加载中
查看更多榜单
社区公告
暂无公告
试试用AI创作助手写篇文章吧
+ 用AI写文章