永不言弃 发表于 2023-8-14 10:57:05

如何把WORD文档中的第一个表格复制10从此放在后面



用LIS打开文件后,获取第一个表格,把表格复制10个放在当前表格的后面,有大神知道的,指点一下,谢谢


(defun c:tt()
(setq path "C:\\Users\\Administrator\\Desktop\\坐标.doc")

;;;打开文件
(setq Rtn (vlax-get-or-create-object "word.application"))
(vlax-invoke-method (vlax-get-property Rtn 'Documents) 'Open path)
(vla-put-visible Rtn 1)

(vlax-get-property Rtn "ActiveDocument")
(setq word (vla-get-ActiveDocument Rtn))
(setq bg1 (vla-item (vlax-get word 'tables) 1) );;;第一个表格
;;;问题:如何把这个表格复制10个放在后面


)

技术工作室 发表于 2023-8-16 07:30:19

期待高手截胡
页: [1]
查看完整版本: 如何把WORD文档中的第一个表格复制10从此放在后面