|

分享例程
界面截图: |
|
备注说明: |
- |
模块实例
[e]
.版本 2.支持库 shell.子程序 _临时子程序.局部变量 i, 整数型.局部变量 坐标1, 单元格坐标.局部变量 坐标2, 单元格坐标' 本名称子程序用作测试程序用,仅在开发及调试环境中有效,编译发布程序前将被系统自动清空,请将所有用作测试的临时代码放在本子程序中。 ***注意不要修改本子程序的名称、参数及返回值类型。WPS_创建 (“我去,居然可以!”, “卧槽!”, 真)坐标1.行号 = 1.计次循环首 (5, i) 坐标1.列号 = i WPS_加入表格 (“卧槽,这是第” + 到文本 (i) + “列”, 坐标1, , , , , 20).计次循环尾 ()坐标1.列号 = 1.计次循环首 (5, i) 坐标1.行号 = i WPS_加入表格 (“卧槽,这是第” + 到文本 (i) + “行”, 坐标1, , , , , 20).计次循环尾 ()坐标1.列号 = 3坐标2.行号 = 1坐标2.列号 = 5信息框 (“表格设置”, 0, )WPS_表格设置 (坐标1, , , 50, , -4108, , #蓝色, “微软雅黑”, 14, 真)坐标1.行号 = 5坐标1.列号 = 1坐标2.行号 = 1坐标2.列号 = 5WPS_表格设置 (坐标1, 坐标2, , , , -4108, , , “微软雅黑”, , 真, , , , -4119, -4138, #灰色)信息框 (“保存并退出”, 0, )WPS_保存退出 (取特定目录 (3) + “\” + 到文本 (取现行时间 ()) + “.xls”).子程序 WPS_创建, , 公开, 创建一个新的空Excel表格.参数 表格名, 文本型, , 表格名称.参数 标题, 文本型, 可空, WPS程序标题.参数 显示, 逻辑型, 可空, 是否显示WPS窗口,默认假不显示字母加入 ().如果真 (是否为空 (显示)) 显示 = 假.如果真结束.如果真 (取反 (是否为空 (标题))) ET程序.标题 (标题).如果真结束ET程序.创建 ()ET工作簿.置程序 ()ET程序.显示 (显示)ET工作簿.新增表格 ()ET工作簿.表格名 (表格名)ET工作簿.激活表格 (1)
[/e]
模块下载
WPS写xls模块.rar
(6.18 KB, 下载次数: 592)
|
|