|
![](static/image/common/ico_lz.png)
楼主 |
发表于 2022-5-29 02:18:29
|
显示全部楼层
福建省莆田市
.版本 2 .支持库 iext book.创建XLSX () book.zc (“TestSheet”, Getkey (“TestSheet”)) book.打开 (目录 + 目录名称 + “-” + 取日期 + “.xlsx”) sheet = book.选择表 (0) 最后一行 = sheet.取使用终止行 () ' sheet.置列宽隐藏 (1, 1, 25, , ) ' sheet.置列宽隐藏 (4, 4, 25, , ) sheet.置单元格文本 (最后一行, 0, 超级列表框1.取标题 (i - 1, 0), ) ' 店铺名称 sheet.置单元格文本 (最后一行, 1, 超级列表框1.取标题 (i - 1, 1), ) ' 店铺名称 sheet.置单元格文本 (最后一行, 2, 超级列表框1.取标题 (i - 1, 2), ) ' 店铺ID sheet.置单元格文本 (最后一行, 3, 超级列表框1.取标题 (i - 1, 3), ) ' 商品ID sheet.置单元格文本 (最后一行, 4, 超级列表框1.取标题 (i - 1, 4), ) ' 商品名称 sheet.置单元格文本 (最后一行, 5, 超级列表框1.取标题 (i - 1, 5), ) ' 价格 sheet.置单元格文本 (最后一行, 6, 超级列表框1.取标题 (i - 1, 6), ) ' 销量 sheet.置单元格文本 (最后一行, 7, 超级列表框1.取标题 (i - 1, 7), ) ' 待成团 sheet.置单元格文本 (最后一行, 8, 超级列表框1.取标题 (i - 1, 8), ) ' 评价 sheet.置单元格文本 (最后一行, 9, 超级列表框1.取标题 (i - 1, 9), ) ' 评价比例 sheet.置单元格文本 (最后一行, 10, 超级列表框1.取标题 (i - 1, 10), ) ' 上货时间 sheet.置单元格文本 (最后一行, 11, 超级列表框1.取标题 (i - 1, 11), ) ' 属性 sheet.置单元格文本 (最后一行, 12, 超级列表框1.取标题 (i - 1, 12), ) ' 一级类目 sheet.置单元格文本 (最后一行, 13, 超级列表框1.取标题 (i - 1, 13), ) ' 二级类目 sheet.置单元格文本 (最后一行, 14, 超级列表框1.取标题 (i - 1, 14), ) ' 三级类目 ' sheet.置单元格文本 (最后一行, 4, 编辑框2.内容, ) book.保存 (目录 + 目录名称 + “-” + 取日期 + “.xlsx”) book.释放 () |
|