精易论坛
标题:
易语言操作WPS保存到xls文件模块
[打印本页]
作者:
hsutr
时间:
2014-3-27 23:12
标题:
易语言操作WPS保存到xls文件模块
模块实例
[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, 下载次数: 593)
2014-3-27 23:10 上传
点击文件名下载附件
下载积分: 精币 -2 枚
作者:
指尖流淌
时间:
2014-3-28 09:38
怎么下不了啊
作者:
网络注册会员
时间:
2014-3-28 13:18
支持一下能下不
作者:
hsutr
时间:
2014-3-29 16:34
使用方法,按以下顺序
WPS_初始化()
WPS_创建()
WPS_加入表格()
WPS_表格设置()’可不写,可写在”WPS_加入表格“前面,用来设置区域表格字体和边框
WPS_保存退出 ()
WPS写xls模块.rar
2014-3-29 16:30 上传
点击文件名下载附件
下载积分: 精币 -2 枚
6.34 KB, 下载次数: 48, 下载积分: 精币 -2 枚
最新版
作者:
宇智波·佐助
时间:
2014-4-4 16:15
这个有点深度
作者:
huningli38
时间:
2014-12-15 21:39
研究研究哈
作者:
lxh6129492
时间:
2014-12-22 12:16
模块看不来
作者:
网络注册会员
时间:
2014-12-27 08:25
这个很有用的
作者:
Alexander——
时间:
2015-8-25 16:59
拿东西要回复!!!!!
作者:
jjspf
时间:
2015-12-18 14:59
要是能开源就更好了!!!!!!
作者:
jjspf
时间:
2015-12-18 15:01
模块实例直接复制粘贴到E没有用个啊!
作者:
yyyfsx
时间:
2016-10-3 15:29
正是我想找的。谢谢!
作者:
297184402
时间:
2017-2-19 22:26
是真的吗?
作者:
chegan
时间:
2017-2-25 17:55
下道士下了 就是用不来
作者:
yxtkznnz
时间:
2017-6-16 10:14
研究研究哈
作者:
chuangxin371
时间:
2017-10-22 16:23
haolihai .下载看看!
作者:
chuangxin371
时间:
2017-10-22 16:23
就是喜欢这么6的
作者:
打Xiao就挺坏
时间:
2017-10-23 21:07
要金币
作者:
打Xiao就挺坏
时间:
2017-10-23 21:18
要金币
作者:
hongjian
时间:
2017-10-27 09:09
对象操作表格
作者:
gxccxj
时间:
2017-12-26 08:45
谢谢楼主分享
作者:
z1006670445
时间:
2018-1-12 15:17
还以为是源码。。。
作者:
hzc208
时间:
2018-3-5 11:17
谢谢楼主分享
作者:
xuel200
时间:
2018-7-31 15:10
谢谢好多东西收下了
作者:
zxasqwzx11
时间:
2018-8-22 16:00
强无敌撒多
作者:
Mr_leaf
时间:
2018-12-16 18:51
下载下来看看是否自己需要
作者:
a644967980a
时间:
2019-8-9 14:17
作者:
lzh3322
时间:
2019-10-13 14:49
必须下载666666
作者:
caoxiaojun521
时间:
2019-11-3 20:46
下载试试下载试试下载试试
作者:
wujie520521
时间:
2020-2-4 17:30
必须下载666666必须下载666666必须下载666666必须下载666666
作者:
a88484062
时间:
2020-4-3 09:50
需要模块来开开
作者:
wincloud
时间:
2020-4-13 09:50
是模块源码吗?
作者:
guayafem12
时间:
2020-5-22 15:29
自己需要
作者:
mwqy19
时间:
2020-12-29 08:16
下载学习
作者:
aaliang
时间:
2020-12-31 18:28
请教高人,怎么设。列隐藏、取消列隐藏,谢谢!
作者:
warhmjian
时间:
2021-10-22 18:52
下载学习
作者:
zhyl8888
时间:
2022-5-4 10:45
作者:
eyy1314
时间:
2022-5-10 12:02
真结束ET程序.创建 ()ET工作簿.置程序 ()ET程序.显示 (显示)ET工作簿.新增表格 ()ET工作簿.表格名 (表格名)ET工作簿.激活表格 (1) [/e]
作者:
饭团蛛丝马迹
时间:
2023-4-7 10:57
非常感谢,正想着用呢
作者:
维度天空
时间:
2023-4-16 06:45
必须下载必须下载必须下载必须下载必须下载必须下载必须下载必须下载必须下载
作者:
维度天空
时间:
2023-4-16 06:56
作者:
维度天空
时间:
2023-4-16 06:57
作者:
欣少
时间:
2023-5-9 23:35
.版本 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
)
.版本 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)
这个列子。太搞了
作者:
JunBW5858
时间:
2023-5-24 14:39
作者:
Masonic
时间:
2023-6-5 21:13
感谢
作者:
刺痛的伤009
时间:
2024-4-11 19:47
.版本 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)
这个列子。太搞了
作者:
haibaoyeye
时间:
2024-11-12 21:40
学习一下
作者:
轻舟开发
时间:
2024-11-17 02:10
11111111111111111111111111111111
作者:
奔放的牛
时间:
2025-1-23 15:41
感谢分享,看看是我需要的不
作者:
sunhetong8
时间:
2025-5-25 23:07
学习学习
作者:
sunhetong8
时间:
2025-5-25 23:07
欢迎光临 精易论坛 (https://125.confly.eu.org/)
Powered by Discuz! X3.4