明经CAD社区

 找回密码
 注册

QQ登录

只需一步,快速开始

搜索
查看: 403|回复: 5

[提问] lisp如何控制 excel控件CheckBox1打钩

[复制链接]
发表于 2021-1-7 10:28 | 显示全部楼层 |阅读模式
10明经币

最佳答案

查看完整内容

继续遍历结合内每一个控件的属性,就应该可以找到对应的控件
发表于 2021-1-7 10:29 | 显示全部楼层
继续遍历结合内每一个控件的属性,就应该可以找到对应的控件
回复

使用道具 举报

 楼主| 发表于 2021-1-7 10:30 | 显示全部楼层
J:\Desktop\棉\2.png
回复

使用道具 举报

 楼主| 发表于 2021-1-7 11:48 | 显示全部楼层
ActiveSheet.OLEObjects("CheckBox17").Object.Value = 0


VBA代码是这样的
我目前能够做到
(setq ddd (Vlax-Get (Vlax-Get (Vlax-Get excel 'ActiveWorkbook) 'ActiveSheet ) 'OLEObjects)) ;获取OLEObjects 集合
(Vlax-Invoke-Method ddd 'Delete) ;删除所有控件

但是不知道怎么获取指定的控件
回复

使用道具 举报

 楼主| 发表于 2021-1-12 09:54 | 显示全部楼层
kozmosovia 发表于 2021-1-9 11:17
继续遍历结合内每一个控件的属性,就应该可以找到对应的控件

找不到 它 所以才求助
回复

使用道具 举报

 楼主| 发表于 2021-1-19 17:08 | 显示全部楼层
自己解决了,谢谢大家
(Vlax-Put-Property (vlax-get-property (Vlax-Invoke-Method OLEObjectslsp  'item  (strcat CheckBox  (itoa CheckBoxnb)) )'Object) 'Value  1)
回复

使用道具 举报

您需要登录后才可以回帖 登录 | 注册

本版积分规则

小黑屋|手机版|CAD论坛|CAD教程|CAD下载|联系我们|关于明经|明经通道 ( 粤ICP备05003914号 )  
©2000-2023 明经通道 版权所有 本站代码,在未取得本站及作者授权的情况下,不得用于商业用途

GMT+8, 2024-6-1 22:18 , Processed in 0.224217 second(s), 23 queries , Gzip On.

Powered by Discuz! X3.4

Copyright © 2001-2021, Tencent Cloud.

快速回复 返回顶部 返回列表