如何把超级列表框中的内容导入到已做好的excel模板里

球王

超级列表框内容时始终是导入到新建立的BOOK1文件中，我想导入到一个已做好的EXCEL模板里，请各位大侠指点

108937101

.版本 2
.支持库 eExcel2000
.支持库 iext
.支持库 shell
.程序集 窗口程序集1
.子程序 __启动窗口_创建完毕
通用对话框_公用.初始目录 ＝ 取运行目录 ()
.子程序 子程序_导出
.局部变量 局部_计次1, 整数型
.局部变量 局部_计次, 整数型
.局部变量 局部_导出头, 文本型, , "0"
通用对话框_公用.类型 ＝ 1
.如果真 (通用对话框_公用.打开 () ＝ 假)
    返回 ()
.如果真结束
载入 (窗口_导出进度, _启动窗口, 假)
Excel程序1.创建 ()
Excel工作簿1.置程序 (Excel程序1)
Excel工作簿1.激活工作簿 ()
Excel工作簿1.表格序号 ＝ 1
局部_导出头 ＝ { “姓名”, “性别”, “分类”, “住址”, “单位地址”, “手机号码”, “办公电话”, “家庭电话”, “小灵通” }
.计次循环首 (取数组成员数 (局部_导出头), 局部_计次1)
    Excel工作簿1.首单元格 ＝ 字符 (97 ＋ 局部_计次1 － 1) ＋ 到文本 (1)
    Excel工作簿1.尾单元格 ＝ 字符 (97 ＋ 局部_计次1 － 1) ＋ 到文本 (1)
    Excel工作簿1.内容格式 ＝ “@”
    Excel工作簿1.内容 ＝ 局部_导出头 [局部_计次1]
.计次循环尾 ()
窗口_导出进度.进度条1.最大位置 ＝ 超级列表框_主窗口.取表项数 ()
.计次循环首 (超级列表框_主窗口.取表项数 (), 局部_计次)
    处理事件 ()
    .计次循环首 (取数组成员数 (局部_导出头), 局部_计次1)
        Excel工作簿1.首单元格 ＝ 字符 (97 ＋ 局部_计次1 － 1) ＋ 到文本 (局部_计次 ＋ 1)
        Excel工作簿1.尾单元格 ＝ 字符 (97 ＋ 局部_计次1 － 1) ＋ 到文本 (局部_计次 ＋ 1)
        Excel工作簿1.内容格式 ＝ “@”
        Excel工作簿1.内容 ＝ 超级列表框_主窗口.取标题 (局部_计次 － 1, 局部_计次1 － 1)
    .计次循环尾 ()
    窗口_导出进度.进度条1.位置 ＝ 窗口_导出进度.进度条1.位置 ＋ 1
.计次循环尾 ()
.如果真 (是否已创建 (窗口_导出进度))
    窗口_导出进度.销毁 ()
.如果真结束
Excel工作簿1.保存 (通用对话框_公用.文件名)
_启动窗口.Excel工作簿1.关闭 ()
_启动窗口.Excel工作簿1.释放 ()
_启动窗口.Excel程序1.退出 ()
_启动窗口.Excel程序1.释放 ()
信息框 (“导出成功!”, #信息图标, )
执行 (4, 通用对话框_公用.文件名, , )
返回 ()

球王

看来你没有懂我的意思,
因为我不知道怎么在程序中改变Excel的页面设置，（如页边距，横向排版还是纵向排版，页眉页脚等）,所以我事先用Excel做了一个模板放在D:\AAA.xls,把页面设置、宏等内容都已经加在这个excel文件中了，然后我想编一个程序，把程序中的超级列表框中的内容导入到D:\AAA.xsl这个文件中，然后任务就完成了。
   然而我做的程序只能把超级列表框里的内容导入到新建的一个BOOK1的文件中，而不能导入到这个模板中，尽管我的程序已经打开了AAA.XSL这个文件，但是就不往里面写，而是写入到BOOK1这个文件里面，现在我就想问，加什么语句才能让内容导入到AAA.XSL这个文件里，能明白吗？你做的这个跟我做的效果是一样的

6k31

我也想弄清楚

球王

那就不要让他沉下去

LDFT

xuexila学习啦

虚空下

这个帖子我可以解决了。。有例程的。。楼主解决了没有？要是没有。回个信息。。我把例程传上来

ping68426

虚空下 发表于 2012-8-21 10:36
这个帖子我可以解决了。。有例程的。。楼主解决了没有？要是没有。回个信息。。我把例程传上来

你好,請把這個案例發給我一下.多謝
13692257483@163.com

wangshiyuan

虚空下 发表于 2012-8-21 10:36
这个帖子我可以解决了。。有例程的。。楼主解决了没有？要是没有。回个信息。。我把例程传上来

大师能不能把这个列程也发我一个，非常感谢！QQ:659747829@qq.com

wangshiyuan

这个贴子咋没有大神们出手？