精易论坛

标题: Excel常用命令对象调用 再次升级 补充部分命令 [打印本页]

作者: 花间一壶酒    时间: 2023-4-24 21:43
标题: Excel常用命令对象调用 再次升级 补充部分命令
本帖最后由 赤璃琴殇 于 2023-4-24 21:49 编辑

先放上老帖子  https://125.confly.eu.org/forum.php?mod=viewthread&tid=14769731&extra=



根据上一个帖子的评论区要求 补充了部分命令
1.新增命令:
单元格_置单元格格式
单元格_取单元格格式
单元格_筛选
单元格_置对齐方式
单元格_取对齐方式
单元格_插入图片
单元格_复制为图片
Excel_获取程序对象
Excel_置程序

改动部分:
因为之前只有Excel_创建程序对象 所以我直接把获取工作表工作簿单元格对象之类的功能全部写在打开工作簿里
但是现在新增Excel_获取程序对象(也就是支持获取已经开启的程序的对象)所以将获取各种对象的功能全部提起出来单独制作成 Excel_置程序 命令
具体使用方法 参考例子里的子程序 _按钮_初始化_被单击
如果实在知道怎么使用可以看B站的视频  www.bilibili.com/video/BV1ig4y1b7rZ
[url=<iframe src=][/url]








补充内容 (2023-4-27 14:15):
一直有人和我说WPS程序对象创建不成功的  启动不起来的  请看置顶楼层  我在下面补充下说明

Excel对象操作.e

1014.49 KB, 下载次数: 324, 下载积分: 精币 -2 枚


作者: 光影魔术    时间: 2023-4-24 21:56
感谢分享
作者: 1091903426    时间: 2023-4-24 22:28
感谢分享
作者: 布点脚本师    时间: 2023-4-25 01:31
        新技能已get√
作者: 一指温柔    时间: 2023-4-25 08:37
支持开源~!感谢分享
作者: 李泽勇2    时间: 2023-4-25 08:37
小虫子的Excel模块也很好,可以互相借鉴学习。
作者: 网络注册网员    时间: 2023-4-25 08:56
支持升级
作者: renjianhong48we    时间: 2023-4-25 09:38
感谢分享
作者: 凌哥    时间: 2023-4-25 09:51
话说Excel表格都是什么情况下要用到的
作者: 指尖流淌    时间: 2023-4-25 10:20
支持开源~!感谢分享
作者: 给自己留一片天空    时间: 2023-4-25 10:32
支持开源~!感谢分享
作者: 给自己留一片天空    时间: 2023-4-25 11:03
支持开源~!感谢分享
作者: dxp04    时间: 2023-4-25 11:05
感谢分享,我提个小建议,能否增加 表格某列取首拼
作者: 花间一壶酒    时间: 2023-4-25 11:35
凌哥 发表于 2023-4-25 09:51
话说Excel表格都是什么情况下要用到的

有些公司上班要整理数据  还要求必须用Excel表格  数据量还大还重复。。。。就很蛋疼啊
作者: 396384183    时间: 2023-4-25 13:06
感谢分享
作者: kyo9766    时间: 2023-4-25 15:59
增加的功能很实用,感谢分享
作者: 深圳梦    时间: 2023-4-25 20:19
支持开源~!感谢分享
作者: impkq    时间: 2023-4-25 23:12
支持开源~!感谢分享
作者: gaoqing    时间: 2023-4-26 11:15
谢谢分享
作者: opq123    时间: 2023-4-26 15:53
感谢分享,很给力!~
作者: duisir    时间: 2023-4-26 20:59
666666666666666666666666666666666666666666666666666666666
作者: dangerace    时间: 2023-4-27 14:02
并不能正常运行啊。点击“启动程序”,就提示wps启动失败,到源码里把“wps.exe”,修改成“excel.exe”,仍然无法正常 运行程序。
作者: 花间一壶酒    时间: 2023-4-27 14:07
本帖最后由 赤璃琴殇 于 2023-4-27 14:09 编辑
dangerace 发表于 2023-4-27 14:02
并不能正常运行啊。点击“启动程序”,就提示wps启动失败,到源码里把“wps.exe”,修改成“excel.exe”, ...

。。。。重点是 创建程序对象里的 ket.application   代表wpe  如果 你是WPS就不用改  如果你是微软的EXCEL
就需要改成 excel.application   

按钮_启动 下面的代码写的取程序ID  取的是WPS的进程ID 用于强制结束WPS进程  与你创建程序是没有半毛钱关系的。。。。
另外WPS版本如果创建程序对象失败 可以把WPS卸载再重装下  可能是注册表问题  

作者: 花间一壶酒    时间: 2023-4-27 14:21
  
子程序名返回值类型公开备 注
Excel_创建程序对象逻辑型 
判断 (全_程序对象.创建 (“ket.application”, ))
全_工作簿集 = 全_程序对象.读对象型属性 (“Workbooks”, )
返回 ()
判断 (全_程序对象.创建 (“Excel.application”, ))
全_工作簿集 = 全_程序对象.读对象型属性 (“Workbooks”, )
返回 ()
返回 ()


WPS和微软的Excel  程序对象的名字是不一样的    WPS版本是“ket.application”(还有一种说法是 “Kwps.application” 这种我没有试过不清楚具体能不能用)   微软版本是“Excel.application”

如果更改之后 还是不能用  请直接卸载程序重新安装  可能是注册表问题  (这种情况一般存在于 系统重装了  但是WPS程序依旧用的上一个系统安装的程序) 重新安装即可解决

另外 按钮_启动 代码下面的 进程_名取ID (“wps.exe”, )  是用与强制结束已启动的WPS进程的  因为怕重复启动wps卡进程   与创建程序对象没有什么关系

  
子程序名返回值类型公开备 注
_按钮_启动_被单击  
变量名类 型静态数组备 注
进程ID整数型 
进程ID = 进程_名取ID (“wps.exe”, )
如果真 (进程ID ≠ 0)
进程_结束 (进程ID)
判断 (Excel_创建程序对象 ())
信息框 (“WPS启动成功”, 64, , )
信息框 (“WPS启动失败”, 16, , )




作者: dangerace    时间: 2023-4-27 14:30
赤璃琴殇 发表于 2023-4-27 14:07
。。。。重点是 创建程序对象里的 ket.application   代表wpe  如果 你是WPS就不用改  如果你是微软的EXCE ...

哦哦,浅薄了。不过很奇怪为什么放出来的是个只有少数人使用wps版本而不是excel版本。这样很多小白会以为程序有问题而放弃使用你的作品。
作者: 花间一壶酒    时间: 2023-4-27 14:46
dangerace 发表于 2023-4-27 14:30
哦哦,浅薄了。不过很奇怪为什么放出来的是个只有少数人使用wps版本而不是excel版本。这样很多小白会以为 ...

。。。窗口创建下面就已经说明了  两个程序对象是不一样的  再者主要是用WPS的更多好么  老司机才用微软版本  WPS免费  微软的要激活
作者: zhqg666    时间: 2023-4-27 18:23
支持开源~!感谢分享
作者: ermituofo    时间: 2023-4-27 21:13
功能很强,值得借鉴。。。
作者: xuany    时间: 2023-4-28 09:17
先感谢,再下载,谢谢!
作者: dj1990    时间: 2023-4-28 11:23

支持开源~!感谢分享
作者: hhhyxb    时间: 2023-4-28 16:39
看看好用不。
作者: 中發白    时间: 2023-4-28 19:56
支持开源共同发展共同富裕
作者: 饭团蛛丝马迹    时间: 2023-4-28 20:48
来学习下,正准备做呢
作者: 云少i    时间: 2023-4-28 22:25
好东西啊、
作者: 缘之圆    时间: 2023-4-29 10:19
还差一个选择性粘贴为数值的  操作代码,要是有就好了。
作者: 花间一壶酒    时间: 2023-4-29 13:09
缘之圆 发表于 2023-4-29 10:19
还差一个选择性粘贴为数值的  操作代码,要是有就好了。



在原本的粘贴 “PasteSpecial”方法  的第一个参数 添加上面图片的值就行了  

作者: 曜辉    时间: 2023-4-30 16:07
这个已经很强大的说了,赞一个!
作者: 缘之圆    时间: 2023-4-30 16:22
本帖最后由 缘之圆 于 2023-4-30 16:24 编辑
赤璃琴殇 发表于 2023-4-29 13:09
在原本的粘贴 “PasteSpecial”方法  的第一个参数 添加上面图片的值就行了  
...

C:\Users\Administrator.KING-20170830CS\Desktop\66.png
我这样改了,还是没有效果

66.png (32.29 KB, 下载次数: 0)

66.png

作者: 花间一壶酒    时间: 2023-4-30 19:54
缘之圆 发表于 2023-4-30 16:22
我这样改了,还是没有效果

PasteSpecial  方法名设置个   参数值直接写 11 (就是之前给你发的图片上面的值)
作者: 花间一壶酒    时间: 2023-4-30 19:57
缘之圆 发表于 2023-4-30 16:22
我这样改了,还是没有效果
  
子程序名返回值类型公开备 注
单元格_粘贴  
参数名类 型参考可空数组备 注
工作表索引整数型
区域文本型
全_表格集.读对象型属性 (“Item”, 工作表索引).读对象型属性 (“Cells”, ).读对象型属性 (“Range”, 区域).方法 (“PasteSpecial”, 11)  ' 方法名就是“PasteSpecial” 后面参数填上要粘贴的类型的值  也就是我给你发的图片上的整数型值



作者: pasyou1    时间: 2023-5-1 14:54
方法名设置个   参数值直接写 11
作者: inmyheart    时间: 2023-5-2 10:41
支持开源~!感谢分享
作者: 阴影    时间: 2023-5-2 15:39
感谢分享
作者: duisir    时间: 2023-5-3 11:59
6666666666666666666666666666666666666666666666666
作者: loveu1316    时间: 2023-5-4 08:36
不错不错,下载学习学习,感谢楼主分享
作者: duanqing    时间: 2023-5-4 10:44
很强大,很复杂,很需要,很遗憾,不会用
作者: 花间一壶酒    时间: 2023-5-4 12:57
duanqing 发表于 2023-5-4 10:44
很强大,很复杂,很需要,很遗憾,不会用

例子都写在一起了  不会用能说明啥。。。。
作者: 忧郁之子    时间: 2023-5-7 08:29
好东西,谢谢分享
作者: 矜陌    时间: 2023-5-7 10:07
感谢大佬分享,谢谢
作者: 缘之圆    时间: 2023-5-10 12:46
要是有排序就好了,整了很久不知道用易语言来操作Excel  怎么设计排序
作者: 花间一壶酒    时间: 2023-5-10 13:39
缘之圆 发表于 2023-5-10 12:46
要是有排序就好了,整了很久不知道用易语言来操作Excel  怎么设计排序

有筛选功能啊  自己照着改改不就能排序了么
作者: 缘之圆    时间: 2023-5-10 19:05
赤璃琴殇 发表于 2023-5-10 13:39
有筛选功能啊  自己照着改改不就能排序了么

我 小白一个   不会弄
作者: ibelieve    时间: 2023-5-12 08:36
感谢分享
作者: 坤哥123cd    时间: 2023-5-12 09:51
楼主,写入内容加入到线程里就无法写入,怎么解决
作者: 花间一壶酒    时间: 2023-5-12 11:37
坤哥123cd 发表于 2023-5-12 09:51
楼主,写入内容加入到线程里就无法写入,怎么解决

CoUninitialize () '取消原本的COM库
CoInitializeEx (0, 0) ’初始化双线程COM库

把这两个函数写上  然后在线程里面创建新的对象就行了
作者: 坤哥123cd    时间: 2023-5-14 12:41
赤璃琴殇 发表于 2023-5-12 11:37
CoUninitialize () '取消原本的COM库
CoInitializeEx (0, 0) ’初始化双线程COM库

好的,谢谢,我尝试下
作者: hongsun2016    时间: 2023-5-16 09:26
谢谢分享!!!
作者: biao84    时间: 2023-5-16 12:20
学习查找功能,感谢
作者: GPPQWN    时间: 2023-5-16 14:28
感谢分享
作者: xiaokui0558    时间: 2023-5-25 07:23
整了很久不知道用易语言来操作Excel  
作者: 313555544    时间: 2023-5-25 14:42
666666666666666666666666666666666666666
作者: shuidea123    时间: 2023-6-12 22:36
非常强大,赞一个!大佬能不能增加判断单元格是否是合并单元格和取合并单元格占用行数和列数的方法
作者: shuidea123    时间: 2023-6-12 23:49
shuidea123 发表于 2023-6-12 22:36
非常强大,赞一个!大佬能不能增加判断单元格是否是合并单元格和取合并单元格占用行数和列数的方法 ...

合并单元格占用行数 = 全_表格集.读对象型属性 (“Item”, 工作表索引).读对象型属性 (“Cells”, ).读对象型属性 (“Range”, 区域).读对象型属性 (“Rows”, ).读数值属性 (“Count”, )


我这样写返回的数值一直是1,不能正确显示合并所占用的行数
作者: angell5411    时间: 2023-6-20 18:17
真的很棒, 感谢分享
作者: 花间一壶酒    时间: 2023-6-20 20:03
shuidea123 发表于 2023-6-12 23:49
合并单元格占用行数 = 全_表格集.读对象型属性 (“Item”, 工作表索引).读对象型属性 (“Cells”, ).读 ...
  
子程序名返回值类型公开备 注
单元格_取合并单元格占用行数整数型 
参数名类 型参考可空数组备 注
工作表索引整数型
区域文本型
返回 (全_表格集.读对象型属性 (“Item”, 工作表索引).读对象型属性 (“Cells”, ).读对象型属性 (“RANGE”, 区域).读对象型属性 (“MergeArea”, ).读对象型属性 (“Rows”, ).读数值属性 (“Count”, ))


这样写

作者: shuidea123    时间: 2023-8-7 14:47
赤璃琴殇 发表于 2023-6-20 20:03
[e=0].版本 2

.子程序 单元格_取合并单元格占用行数, 整数型

谢谢,这样写是正确的
作者: LVMUKE    时间: 2023-8-9 02:15
感谢分享。。
作者: gao110108    时间: 2023-8-26 14:27
有没有 批量替换?
作者: mnin    时间: 2023-9-20 20:45

感谢分享。
作者: 221211    时间: 2023-9-25 13:46
下载试试
作者: 宇智波·老破孩    时间: 2023-9-29 15:44
感谢分享,好好学习下
作者: 小白阿    时间: 2023-9-30 15:44
感谢分享,前来学习
作者: 易fei    时间: 2023-9-30 19:38
感谢分享,前来学习
作者: shanlucc    时间: 2023-10-10 22:10
好像没有排序,试了半天没试出来
作者: 413179891    时间: 2023-11-1 11:05
下载学习学习 哈哈哈哈, 还是易语言强大
作者: 413179891    时间: 2023-11-1 11:05
下载学习学习 哈哈哈哈, 还是易语言强大
作者: xjyehonghai    时间: 2023-11-17 14:23
本帖最后由 xjyehonghai 于 2023-11-17 14:25 编辑
  
子程序名返回值类型公开备 注
Excel_创建程序对象逻辑型 
判断 (全_程序对象.创建 (“ket.application”, ))
全_工作簿集 = 全_程序对象.读对象型属性 (“Workbooks”, )
返回 ()

判断 (全_程序对象.创建 (“Excel.application”, ))
全_工作簿集 = 全_程序对象.读对象型属性 (“Workbooks”, )
返回 ()

返回 ()

子程序名返回值类型公开备 注
Excel_获取程序对象逻辑型 
判断 (全_程序对象.获取 (“ket.application”))
全_工作簿集 = 全_程序对象.读对象型属性 (“Workbooks”, )
返回 ()

判断 (全_程序对象.获取 (“Excel.application”))
全_工作簿集 = 全_程序对象.读对象型属性 (“Workbooks”, )
返回 ()

返回 ()
  
全局变量名类 型数组公开备 注
全_程序对象对象  
全_工作簿集对象  
全_工作簿对象  
全_单元格对象  
全_表格集对象  
全_表格对象  
全_表格函数对象  



作者: zboyy866    时间: 2023-11-18 10:57
感谢分享,很给力!~
作者: zboyy866    时间: 2023-11-21 09:07

感谢分享,好好学习下
作者: year1970    时间: 2023-11-28 21:42

感谢分享,很给力!
作者: IceCc    时间: 2023-12-7 08:40
感谢分享,很给力!~
作者: zhangchao123    时间: 2023-12-19 00:37
dsafsdafsadf
作者: 1689478353    时间: 2023-12-23 15:50
        支持开源~!感谢分享
作者: 1689478353    时间: 2023-12-23 15:51
        支持开源~!感谢分享
作者: 小学生123    时间: 2024-12-8 00:26
感谢分享
作者: h1003591791    时间: 2024-12-10 16:46
感谢分享
作者: frozensy    时间: 2024-12-26 19:06
无法保存呀
作者: 就是那个秋    时间: 2024-12-28 21:20
        支持开源~!感谢分享
作者: lassgo    时间: 2024-12-28 21:21
全论坛易友发来贺电,祝贺大家一起进步!
作者: xab111    时间: 2025-2-11 18:46
因为之前只有Excel_创建程序对象 所以我直接把获取工作表工作簿单元格对象之类的功能全部写在打开工作簿里
作者: lhhonghao    时间: 2025-4-22 11:01
        支持开源~!感谢分享

作者: lxn2wyf    时间: 2025-4-22 13:00
哇,赤璃琴殇又来升级帖子啦,看来是真·Excel大神啊。命令补充得好及时,正好我最近在捣鼓这些,谢谢分享哈!




欢迎光临 精易论坛 (https://125.confly.eu.org/) Powered by Discuz! X3.4