|
导入到高级表格 | | |
|
表格路径 | 文本型 | | | |
工作表名 | 文本型 | | | | 包含表头 | 逻辑型 | | | |
变量名 | 类 型 | 静态 | 数组 | 备 注 |
表格 | XL工作簿类 | | |
工作表 | XL工作表类 | | |
格式 | XL格式类 | | |
表格行数 | 整数型 | | |
表格列数 | 整数型 | | |
计次行数 | 整数型 | | |
计次列数 | 整数型 | | |
已修改列宽 | 逻辑型 | | |
表格.
打开文件 (表格路径
)工作表 = 表格.
选择工作表 (工作表名
)表格行数 =
到整数 (工作表.
结束使用行 () - 工作表.
开始使用行 ())
表格列数 =
到整数 (工作表.
结束使用列 () - 工作表.
开始使用列 ())
高级表格1.列数 = 表格列数
计次循环首 (表格行数, 计次行数
)
高级表格1.
插入行 (,
)
计次循环首 (表格列数, 计次列数
)

如果真 (取反 (已修改列宽
))



高级表格1.
置列宽 (计次列数 - 1, 工作表.
取列宽像素 (计次列数 - 1
))


如果 (包含表头
)


高级表格1.
置数据 (计次行数 - 1, 计次列数 - 1,
#表格常量 .文本型, 工作表.
取单元格内容 (计次行数 - 1, 计次列数 - 1
))



高级表格1.
置数据 (计次行数, 计次列数 - 1,
#表格常量 .文本型, 工作表.
取单元格内容 (计次行数 - 1, 计次列数 - 1
))




计次循环尾 ()
已修改列宽 = 真
计次循环尾 ()
如果真 (包含表头
)
高级表格1.
删除行 (高级表格1.行数 - 1
)
|
导出高级表格 | | |
|
表格路径 | 文本型 | | | |
工作表名 | 文本型 | | | | 包含表头 | 逻辑型 | | | |
变量名 | 类 型 | 静态 | 数组 | 备 注 |
表格 | XL工作簿类 | | |
工作表 | XL工作表类 | | |
计次行数 | 整数型 | | |
计次列数 | 整数型 | | |
已修改列宽 | 逻辑型 | | |
如果真 (取反 (表格.
打开文件 (表格路径
))
)
表格.
新建文件 ( #XL文件类型_XLSX )
如果 (表格.
取工作表名 (工作表名
) =
“”)
工作表 = 表格.
插入工作表 (工作表名, ,
)
工作表 = 表格.
选择工作表 (工作表名
)
计次循环首 (高级表格1.行数, 计次行数
)
计次循环首 (高级表格1.列数, 计次列数
)

如果真 (取反 (已修改列宽
))



工作表.
置列宽像素 (计次列数 - 1, , 高级表格1.
取列宽 (计次列数 - 1
), ,
)

如果 (包含表头
)


工作表.
置单元格文本 (计次行数 - 1, 计次列数 - 1, 高级表格1.
取数据 (计次行数 - 1, 计次列数 - 1
),
)


工作表.
置单元格文本 (计次行数 - 1, 计次列数 - 1, 高级表格1.
取数据 (计次行数, 计次列数 - 1
),
)



计次循环尾 ()
已修改列宽 = 真
计次循环尾 ()表格.
保存文件 (表格路径
)|
导出超级列表框 | | |
|
表格路径 | 文本型 | | | |
工作表名 | 文本型 | | | | 包含表头 | 逻辑型 | | | |
变量名 | 类 型 | 静态 | 数组 | 备 注 |
表格 | XL工作簿类 | | |
工作表 | XL工作表类 | | |
计次行数 | 整数型 | | |
计次列数 | 整数型 | | |
总数 | 长整数型 | | |
列数 | 整数型 | | |
已置入表头 | 逻辑型 | | |
b | 整数型 | | |
如果真 (取反 (表格.
打开文件 (表格路径
))
)
表格.
新建文件 ( #XL文件类型_XLSX )
如果 (表格.
取工作表名 (工作表名
) =
“”)
工作表 = 表格.
插入工作表 (工作表名, ,
)
工作表 = 表格.
选择工作表 (工作表名
)总数 = 超级列表框1.取表项数 ()列数 = 超级列表框1.
取列数 ()
计次循环首 (总数, 计次行数
)
计次列数 = 0

计次循环首 (列数, 计次列数
)

如果 (包含表头
且 取反 (已置入表头
))



工作表.
置单元格文本 (0, 计次列数 - 1, 超级列表框1.
取列标题 (计次列数 - 1
),
)


工作表.
置单元格文本 (计次行数, 计次列数 - 1, 超级列表框1.
取标题 (计次行数 - 1, 计次列数 - 1
),
)


工作表.
置单元格文本 (计次行数 - 1, 计次列数 - 1, 超级列表框1.
取标题 (计次行数 - 1, 计次列数 - 1
),
)



计次循环尾 ()
已置入表头 = 真
计次循环尾 ()表格.
保存文件 (表格路径
)|
导入到超级列表 | | |
|
表格路径 | 文本型 | | | |
工作表名 | 文本型 | | | | 包含表头 | 逻辑型 | | | |
变量名 | 类 型 | 静态 | 数组 | 备 注 |
表格 | XL工作簿类 | | |
工作表 | XL工作表类 | | |
格式 | XL格式类 | | |
表格行数 | 整数型 | | |
表格列数 | 整数型 | | |
计次行数 | 整数型 | | |
计次列数 | 整数型 | | |
已修改列宽 | 逻辑型 | | |
表项索引 | 整数型 | | |
列索引 | 整数型 | | |
已置入表头 | 逻辑型 | | |
表格.
打开文件 (表格路径
)工作表 = 表格.
选择工作表 (工作表名
)表格行数 =
到整数 (工作表.
结束使用行 () - 工作表.
开始使用行 ())
表格列数 =
到整数 (工作表.
结束使用列 () - 工作表.
开始使用列 ())
超级列表框1.
全部删除 ()
计次循环首 (表格行数, 计次行数
)
表项索引 = 超级列表框1.
插入表项 (, , , , ,
)
计次列数 = 0

计次循环首 (表格列数, 计次列数
)

如果真 (取反 (已修改列宽
))



超级列表框1.
置列宽 (计次列数 - 1, 工作表.
取列宽像素 (计次列数 - 1
))


如果真 (包含表头
且 取反 (已置入表头
))



超级列表框1.
置列标题 (计次列数 - 1, 工作表.
取单元格内容 (0, 计次列数 - 1
))

超级列表框1.置标题 (计次行数 - 1, 计次列数 - 1, 工作表.取单元格内容 (计次行数, 计次列数 - 1))
计次循环尾 ()
已修改列宽 = 真

已置入表头 = 真
计次循环尾 ()