YUYUFENG 发表于 2023-11-10 17:57:42

求助,关于采用SendKeys模拟键盘执行Excel选择性粘贴的问题

本帖最后由 YUYUFENG 于 2023-11-10 17:57 编辑

求各位大佬帮帮忙,本来想用关于采用SendKeys模拟键盘来执行Excel选择性粘贴的,可是卡在了选择性粘贴的窗体界面,SendKeys没反应。
下面是lisp,求帮帮忙看看什么问题,怎么让脚本运行成功。

(defun c:tt (/)
(vl-cmdf "_.pastespec" )
(run_shell)
(princ)
)

;;键盘操作脚本
(defun run_shell (/)
(setq shell (Vlax-Create-Object "WScript.Shell"))
(vlax-invoke shell "AppActivate" "选择性粘贴")
(vl-cmdf "delay" 500)
(vlax-invoke shell "SendKeys" "{DOWN 3}")
(vl-cmdf "delay" 500)
(vlax-invoke shell "SendKeys" "{ENTER}")
(vlax-release-object shell)
)


页: [1]
查看完整版本: 求助,关于采用SendKeys模拟键盘执行Excel选择性粘贴的问题