超级列表框导人到excel表的问题

wangshiyuan

   超级列表框有很多行导入到excel表格里，但是excel表格打印区域只设了一页  ，想让excel表格自动增加页数该怎样搞？请教大神！！！！  另一种处理方式是提前把excel表格模板设多页，在用易语言删掉多余的空白页？不知道哪种容易实现。我看excel有   “   Excel工作簿.打印 (-1, 2, 1, 真, “”, 假, 假, “”)  ”  打印能指定从第几页开始到第几页  这个设置能能保存到新创建的表格里下次直接打印不出空白页吗？  感谢了！！！

cobi

test-1.e (7.16 KB, 下载次数: 4)

2024-11-11 13:15 上传

点击文件名下载附件


之前那个帖子，我帮你搞好了啊~

wangshiyuan

cobi 发表于 2024-11-11 13:16
之前那个帖子，我帮你搞好了啊~

感谢感谢   我先看看

wangshiyuan

cobi 发表于 2024-11-11 13:16
之前那个帖子，我帮你搞好了啊~

大 师  删除的有点慢  能帮我优化一下吗

wangshiyuan

cobi 发表于 2024-11-11 13:16
之前那个帖子，我帮你搞好了啊~

大师  要是不知道表格有多少页该怎样写？

cobi

wangshiyuan 发表于 2024-11-11 18:25
大 师  删除的有点慢  能帮我优化一下吗

冒昧问下，是不是打印的时候不需要太多空白页？
我觉得可以直接在Excel里面设置的：
打印时： 页面加页：

在已知的空页情况下，可以用这个：
test-2.e (4.85 KB, 下载次数: 2)

2024-11-11 19:31 上传

点击文件名下载附件


如果确实需要多点Excel功能之类的，可以在论坛搜索下Excel模块，比如这个：
https://bbs.125.la/forum.php?mod=viewthread&tid=13630700&highlight=Excel%2B%E6%A8%A1%E5%9D%97

cobi

wangshiyuan 发表于 2024-11-11 19:26
大师  要是不知道表格有多少页该怎样写？

不是大师哈，你给我的那个文件我也思索过，但取行数有65536行啊！用易语言处理不太理想。
应该在设计表格的时候先设计好，比如超级列表框里面导出有多少行数据，你传的这个文件一页行数是26行，再根据这个计算用了多少页，然后结合我那代码删除没用的页面。
直接用易语言打印也是可以的：
Excel工作簿1.打印 (起始页, 终止页, 1, 真, “”, 假, 假, “”)

wangshiyuan

cobi 发表于 2024-11-11 19:45
不是大师哈，你给我的那个文件我也思索过，但取行数有65536行啊！用易语言处理不太理想。
应该在设计表格 ...

随机的  就是不知道有多少页才把表格模板设的10页 所以每次打印要么手删要么打印的时候设置  这样就比较麻烦  我我在测试一下第2钟方式  感谢

wangshiyuan

cobi 发表于 2024-11-11 19:32
冒昧问下，是不是打印的时候不需要太多空白页？
我觉得可以直接在Excel里面设置的：
打印时：页面加页：

execl表格能不能按我实际行数规划打印区域和页数？就是我的表格模板是设成一页，实际需要多少页就规划多少页

cobi

wangshiyuan 发表于 2024-11-11 19:55
随机的  就是不知道有多少页才把表格模板设的10页 所以每次打印要么手删要么打印的时候设置  这样就比较 ...

计算数据的总行数，26行一页，这样可以得出页数：

  

窗口程序集名	保 留	保 留	备 注
窗口程序集_启动窗口

子程序名	返回值类型	公开	备 注
__启动窗口_创建完毕

变量名	类 型	静态	数组	备 注
总行数	整数型
页行数	整数型
总页数	整数型

总行数 ＝ 0  ' 取出总行数
页行数 ＝ 26
总页数 ＝ 总行数 ＼ 页行数 ＋ 1
调试输出 (总页数)

i支持库列表	支持库注释
spec	特殊功能支持库

.版本 2<br /> .支持库 spec<br /> <br /> .程序集 窗口程序集_启动窗口<br /> <br /> .子程序 __启动窗口_创建完毕<br /> .局部变量 总行数, 整数型<br /> .局部变量 页行数, 整数型<br /> .局部变量 总页数, 整数型<br /> <br /> 总行数 ＝ 0  ' 取出总行数<br /> 页行数 ＝ 26<br /> 总页数 ＝ 总行数 ＼ 页行数 ＋ 1<br /> 调试输出 (总页数)