超级列表框导入导出Excel模块（可自定义表头）

nnsjj · 发表于 2017-2-21 17:44:39

导不出内容

ximii · 发表于 2017-1-28 22:54:49

ximii 发表于 2017-1-28 22:53
.版本 2
.支持库 eExcel2000
.支持库 iext

写参数时,文件名不用加后缀

ximii · 发表于 2017-1-28 22:53:33

.版本 2
.支持库 eExcel2000
.支持库 iext

.子程序导出Excel
.参数文件名, 文本型
.参数 Excel程序, Excel程序
.参数 Excel工作簿, Excel工作簿
.参数超级列表框, 超级列表框
.局部变量导出项, 文本型
.局部变量 i, 整数型
.局部变量 j, 整数型
.局部变量 k, 整数型

删除文件 (文件名＋ “.xls”)
写到文件 (文件名＋ “.txt”, { })
文件更名 (文件名＋ “.txt”, 文件名＋ “.xls”)
Excel程序.创建 ()
Excel工作簿.置程序 (Excel程序)
.计次循环首 (超级列表框.取列数 (), k)
导出项＝导出项＋超级列表框.取列标题 (k － 1) ＋字符 (#Tab键)
.计次循环尾 ()
导出项＝导出项＋ #换行符
.计次循环首 (超级列表框_技师.取表项数 (), i)
.计次循环首 (超级列表框.取列数 (), j)
导出项＝导出项＋超级列表框.取标题 (i － 1, j － 1) ＋字符 (#Tab键)
.计次循环尾 ()
导出项＝导出项＋ #换行符
.计次循环尾 ()
写到文件 (文件名＋ “.xls”, 到字节集 (导出项))

njpj1984 · 发表于 2017-1-22 11:56:26

得研究研究怎么处理选完的。。。

njpj1984 · 发表于 2017-1-22 09:31:43

不错，可以使用

wki · 发表于 2016-12-23 16:02:55

不错，可以使用

xiaoguan · 发表于 2016-12-16 22:32:13

不错啊，。哈哈

traers · 发表于 2016-11-20 17:59:01

正是我想要的，赞啊！！！

rwurl · 发表于 2016-11-16 12:33:25

谢谢楼主！

一刀破解 · 发表于 2016-10-19 01:34:20

现在还能用么？

		自动登录	找回密码
密码			注册

[易语言成品模块] 超级列表框导入导出Excel模块（可自定义表头）