Foxtable(狐表)用户栏目专家坐堂 → 对excel文件的使用区别


  共有4030人关注过本帖树形打印复制链接

主题:对excel文件的使用区别

帅哥哟,离线,有人找我吗?
zsxx999ja
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:童狐 帖子:212 积分:2275 威望:0 精华:0 注册:2020/10/3 6:58:00
对excel文件的使用区别  发帖心情 Post By:2022/6/8 23:58:00 [只看该作者]

1、这是对excel 那一章对文件的引用
  • Dim App As New MSExcel.Application
    Dim Wb As MSExcel.Workbook = App.WorkBooks.Add
    Wb.WorkSheets(1).name = "hhh"
    Wb.WorkSheets(1).range("A1").Value = "hhh123"
    Wb.SaveAs("d:\123.xls")
    App.Quit
2、这是excel报表一章时对文件的引用
  • Dim Book As New XLS.Book("c:\reports\test.xls")
    Dim
    Sheet1 As XLS.Sheet = Book.Sheets(0)
    Book.Sheets.Add()
    '增加一个工作表
    Dim
    Sheet2 As XLS.Sheet = Book.Sheets(1)
    '引用新增加的

这两种应用场景的差别?

 回到顶部
帅哥哟,离线,有人找我吗?
notebook
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:幼狐 帖子:166 积分:1021 威望:0 精华:0 注册:2016/1/12 20:03:00
  发帖心情 Post By:2022/6/9 1:22:00 [只看该作者]

两者都能操作excel,第一种是最传统的做法,直接调用excel对象处理的;第二种是针对excel报表做过优化封装,增加了一些常用的功能,比如保存成PDF等,便于操作excel报表。
如果想完全控制excel,可以选择第一种方式;如果只是简单操作excel,如果excel报表对象能支持的,就用第二种。
下面用第二种(excel报表)方式完成第一种代码结果

Dim Book As New XLS.Book '定义一个Excel工作簿
Dim Sheet As XLS.Sheet = Book.Sheets(0) '引用工作簿的第一个工作表
Sheet.Name = "hhh"
Sheet(0, 0).Value = "hhh123"
Book.Save("d:\2.xls") '保存工作簿

你分别将上面代码和你提供的第一种代码复制到命令窗口执行,会分别在D盘生成2.xls和1.xls,你可以看到结果是一样的。

 回到顶部