超级列表框数据一键导出到EXCEL表格源码

超级列表框导出到EXCEL下了很多总是很复杂，后来修改了个简单的！提供大家的使用，功能可以再往上添这是个博客权重的小工具一起送给大家。

Excel程序1.创建 ()
Excel工作簿1.置程序 (Excel程序1)
Excel工作簿1.打开 (取运行目录 () ＋ “\取博客排行.xls”)
ls ＝ 超级列表框1.取列数 ()
xs ＝ 超级列表框1.取表项数 ()
.计次循环首 (xs, i)
.计次循环首 (ls, ii)
Excel工作簿1.首单元格 ＝ 多项选择 (ii, “A”, “B”, “C”, “D”, “E”) ＋ 到文本 (i)
Excel工作簿1.尾单元格 ＝ 多项选择 (ii, “A”, “B”, “C”, “D”, “E”) ＋ 到文本 (i)
Excel工作簿1.内容格式 ＝ “@”
Excel工作簿1.内容 ＝ 超级列表框1.取标题 (i － 1, ii － 1)
.计次循环尾 ()
.计次循环尾 ()
Excel工作簿1.保存 (取运行目录 () ＋ “\取博客排行.xls”)
Excel工作簿1.关闭 ()
Excel程序1.释放 ()