VLISP在Excel对象中的应用（二）：Excel中的复制和粘贴

zipo123 · 发表于 2018-9-25 20:58:13

马上注册，结交更多好友，享用更多功能，让你轻松玩转社区。

您需要登录才可以下载或查看，没有账号？立即注册

×

接着昨天的代码继续补充
(setq template-sheet-content(vlax-get-property active-sheet2"Range" "A1:N44")) ;;获取"测试表.xls"中sheet2表格中的区域"A1:N44"的属性
(vlax-invoke-method template-sheet-content "Copy") ;;将"测试表.xls"中sheet2表格中的区域"A1:N44"的内容复制到粘贴板
(setq active-sheet-paste-cell(vlax-get-property active-sheet1 "Range" "A1"));;获取sheet1工作表中的单元格"A1"的属性，如果需要动态选择表格可将"A1"替换为(strcat "A" (vl-princ-to-string 1))，其中1所在的位置可以为A列中任意可表示行数的数字
(vlax-invoke-method active-sheet1 "Activate");;将工作表sheet2置为当前活动工作表，要实现工作表中单元格的选择和数据的粘贴必须将目标工作表设置为活动工作表
(vlax-invoke-method active-sheet-paste-cell "Select" );;选择A1单元格为活动单元格
(vlax-invoke-method active-sheet "Paste");;将sheet2工作表中"A1:N44"的内容粘贴到sheet1中

kqqt6236 · 发表于 2018-9-25 22:45:26

谢谢分享。建议开一个帖就好了。

qxlonmsn · 发表于 2021-8-21 15:21:21

老大我又来顶你了太佩服你真的帮了我大忙请收下我的膝盖你的一二三四五我都收藏了

天下第五坑 · 发表于 2021-8-30 20:20:58

谢谢分享。建议开一个帖就好了。

账号		自动登录	找回密码
密码			立即注册

[每日一码] VLISP在Excel对象中的应用（二）：Excel中的复制和粘贴

马上注册，结交更多好友，享用更多功能，让你轻松玩转社区。

相关帖子