Foxtable(狐表)用户栏目专家坐堂 → 超出最大行数


  共有5090人关注过本帖平板打印复制链接

主题:超出最大行数

帅哥,在线噢!
有点蓝
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:107721 积分:547938 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2022/10/30 20:28:00 [只看该作者]

xls文件最大支持65536行,改为使用xlsx文件

Dim Book As New XLS.Book
fl = "E:\文件\ & dr("表名") & ".xlsx"
Book.Save(fl) ‘先保存为空白的xlsx
Book = New XLS.Book(fl) ‘再次打开这个文件
Dim Sheet As XLS.Sheet = Book.Sheets(0)
……

 回到顶部