xsl表格割

罗孝全

一个xls表格有1000个数据，每行的第一格为一个数据
求把他平均分成若干份，能自义定每份分多少个数据最好
比如我分了100出来总数据就要减100
分出的数据，导出格式为txt和xls
万能的大佬们我来许愿了

小皮卡丘

  

变量名	类 型	静态	数组	备 注
i	整数型
次数	整数型
取出数据	文本型
sy	整数型
i1	整数型
a	整数型
份	整数型
e	整数型

次数 ＝ 到整数 (编辑框数量.内容)
份 ＝ 到整数 (编辑框份.内容)
计次循环首 (份, e)
计次循环首 (次数, i)
sy ＝ 超级列表框2.插入表项 (, , , , , )
取出数据 ＝ 超级列表框1.取标题 (i － 1, 0)
编辑框2.加入文本 (取出数据 ＋ #换行符 )
超级列表框2.置标题 (sy, 0, 取出数据)
计次循环尾 ()
计次循环首 (次数, i1)
超级列表框1.删除表项 (次数 － i1)
计次循环尾 ()
超级列表框_EXCEL_导出 (超级列表框2, “数据”, 真, , 取当前目录 () ＋ “\” ＋ 到文本 (e) ＋ “数据.xlsx”, 假)
写到文件 (取运行目录 () ＋ “/” ＋ 到文本 (e) ＋ “.txt”, 到字节集 (编辑框2.内容))
编辑框2.内容 ＝ “”
超级列表框2.全部删除 ()
计次循环尾 ()

i支持库列表	支持库注释
iext	扩展界面支持库一

.版本 2<br /> .支持库 iext<br /> <br /> .局部变量 i, 整数型<br /> .局部变量 次数, 整数型<br /> .局部变量 取出数据, 文本型<br /> .局部变量 sy, 整数型<br /> .局部变量 i1, 整数型<br /> .局部变量 a, 整数型<br /> .局部变量 份, 整数型<br /> .局部变量 e, 整数型<br /> <br /> 次数 ＝ 到整数 (编辑框数量.内容)<br /> 份 ＝ 到整数 (编辑框份.内容)<br /> .计次循环首 (份, e)<br /> <br />     .计次循环首 (次数, i)<br />         sy ＝ 超级列表框2.插入表项 (, , , , , )<br />         取出数据 ＝ 超级列表框1.取标题 (i － 1, 0)<br />         编辑框2.加入文本 (取出数据 ＋ #换行符)<br />         超级列表框2.置标题 (sy, 0, 取出数据)<br />     .计次循环尾 ()<br />     .计次循环首 (次数, i1)<br />         超级列表框1.删除表项 (次数 － i1)<br />     .计次循环尾 ()<br /> <br />     超级列表框_EXCEL_导出 (超级列表框2, “数据”, 真, , 取当前目录 () ＋ “\” ＋ 到文本 (e) ＋ “数据.xlsx”, 假)<br />     写到文件 (取运行目录 () ＋ “/” ＋ 到文本 (e) ＋ “.txt”, 到字节集 (编辑框2.内容))<br /> <br />     编辑框2.内容 ＝ “”<br />     超级列表框2.全部删除 ()<br /> .计次循环尾 ()

补充内容 (2024-9-8 02:11):
再套一个计次就行了，分多少份，每份多少 都可以自定义，

小皮卡丘

你看下应该是这样，

罗孝全

小皮卡丘 发表于 2024-9-6 23:51
你看下应该是这样，

哥，把他平均分成自义定份数，然后全部导出，总数据等于剩下的数据

罗孝全

小皮卡丘 发表于 2024-9-8 02:10
[e=0].版本 2
.支持库 iext

谢谢111111111111111